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INTRODUCTION 


The integrity and proper Function of the body are dependent upon adequate oxygen 
uptake and delivery to tissues by the cardiopulmonary system. The primary function 
of the lung is to arterialize the mixed venous blood through elimination of carbon dioxide 
and addition of oxygen. This is achieved by ventilation which is a function of volume and 
distribution of respired air in the ventilated alveoli. An additional important Factor 
is the distribution of pulmonary blood flow. Postural position affects ventilation perfusion 
relationships. The space environment, which has been likened to bed rest, is expected 

J 

to affect pulmonary function in a manner similar to assuming the supine position, 

A demonstration of a potential experiment to i|jantitate pulmonary function was 
accepted for the Space Shuttle Concept Verification Test 111. This report describes 
the system used in this experiment. 

EXPERIMENTAL DESIGN 

The design of an experiment for Space Shuttle flights requires that special attention 
be given to three areas: 1) time limitations for experimental activity, 2) ease of ' 
operation, 3) data reliability. To optimize these three areas without compromising 
experimental results, the hardware arrangement shown In Figures 1, 2, and 3 was 
constructed and implemented with the computer program listed in Appendix III. 

To minimize abject interaction with the hardware and thus minimize both time 
expended and possible operator error, measurements were integrated so that only two 
subject activities are necessary. The first requires the subject to place a mouthpiece 
in his mouth and exhale completely to esidual volume (RV) without inhaling. The subject 
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Figure 3 



I'hen takes a full inhalation of oxygen (inspiratory capacity) and again exhales completely 
to RV. After this initial maneuver, the subject continues to breathe normally through 
the mouthpiece for approximately 3 minutes. Data from this activity are used to quantitate 
the parameters defined in Table I* Traditionally, the single-breath maneuver and the 
nitrogen washout are conducted as two separate tests. By combining the two into a single 
procedure, the total test time is significantly reduced. The second subject activity 
requires the subject to take a complete inhalation and then exhale as completely and 
as rapidly as possible. The parameters defined in Table II are calculated from this forced 
vital capacity (FVC) maneuver* ]he parameters defined in Tpble III are derived from 
primary measurements, 


TABLE ! 


Measurement - 


Definition 

Residual Volume 

(RV) 

The volume of air remaining in the lungs after 
a complete exhalation, 

N 2 Delta 


The change in nitrogen concentration {%) 
between 0,75 liters and 1 *25 BTPS liters of 
the first exhalation after the first inhalation 
of 1 00% oxygen , 

Closing Volume 

(CV) 

The volume of air displaced from the apices 
following airway collapse at bases near the 



end of a full exhalation to RV, 
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TABLE I 
(cont , ) 

Measurement" Definition 

VA/RV The amount of alveolar oxygen ventilation 

required to washout one liter of residual 
folurne from the lungs. 

Vital Capacity The maximum volume of air that can be 


exhaled starting from full Inspiration, 



TABLE II 

Measurement 

Definition 

Forced Vital Capacity (FVC) 

The maximum volume of air that can be 
exhaled in the smallest possible time. 

Forced Expired Volume - 1 Sec 

(F E V -j ) 

The maximum volume of air that can be 
exhaled In 1 second. 

Maximum Expiratory Flow Rate 
(MEFR) 

The mean flow rate between 0.2 liters and 
1 .2 liters of the forced vital capacity maneuver. 

Maximum Midexpiratory Flow 
Rate (MMFR) 

The mean flow rate for the middle half of 
the forced vital capacity maneuver. 
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TABLE 111 


Measurement 

Defi nition 

Total Lung Capacity (TLC) 
(TLC = RV + VC) 

The total volume of the lungs at full 
inspiration . 

FEVj/FVC % 

The percent of forced vital capacity that 
can be exhaled in 1 second. 

FVC/VC % 

The ratio of forced vital capacity to vital 

i 

capacity expressed as a percentage. 

CV/VC % 

The ratio of closing volume to vital capacity 
expressed as a percentage. 

CC/TLC % 

The ratio of the sum of residual volume and 
closing volume to total lung capacity expressed 
as a percentage . 

J 


For ease of operation, the compufer program structure has five independent- modules / 
each called by a single key-in on fhe teletype. If some malfunction should occur during 
the use of a module, that module can be restarted by a key-in, increasing data reliability. 

HARDWARE 

The hardware configuration for this experiment is shown in Figure 1 . The spirometer 
is used to measure the volume of each breath, and is the same type used in Skylab 


7 





Experiment M171. A fixed collector, magnetic sector mass spectrometer is used to provide 
continuous definition of gas composition (fractions of N 2 , C> 2 , CC> 2 , and I^O). The 
sample catheter for this mass spectrometer is inserted Into the subject’s vab'e assembly, 
so gas fractions represent concentrations at the mouth. The mass spectrometer was built 
by Perkin-Elmer as a breadboard unit for Skylab Experiment Ml 71 . 

Mass spectrometer and spirometer analog data are received and analyzed by a PDP-81 
computer with 4096 word memory, extended arithmetic element, teletype, and a special 
analog input-output interface. The analog interface contains four analog to digital 
(A/D) conversion channels, a clock that provides ^0 millisecond sampling intervals, 

I 

and six digital to analog channels. Since fly i t-ife>Mcc is not standard hardware, program 
routines using these options would nee' rr.H. : u.„ .liens to allow their use on other computers. 

For acquisition of analog data, a doc; -slope integrating A/D converter is used. This 
A/D converter is very slow but Is relatively immune to noise, and it provides excellent 
accuracy for low level signals while retaining a wide dynamic range. Two control words 
must be sent to the A/D converter to initiate a sample, and two words of data read back. 
First, a 12-bit number is loaded into the accumulator; then instruction 6537 (octal) executed. 

t 

This instruction sends the 12-bit word to a DAC (not used in this program) and reads 
back a 12-bit word from the A/D converter. This word is the mantissa from the previous 
conversion, and must be saved. A second control word, described in Table IV, is then 
loaded into the accumulator and instruction 6537 (octal) executed. This initiates a sample, 
and transfers a 12-bit "mantissa descriptor" to the accumulator. Completion of A/D con- 
version sets a flag. Execution of instruction 6533 while this flag is set will clear the flag 
and cause 'he next instruction lo be skipped. 
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Decoding of this mantissa requires that the mantissa be treated as a positive binary 
fraction, with the radix point at the left of the most significant bit. The "mantissa 
Hescriptoi" must then be decoded to determine how many zeroes are to be inserted between 
the radix point and the most significant mantissa bit, A "mantissa descriptor" that is all 
zeroes indicates the mantissa expressed as a fraction is correct. For a non-zero descriptor, 
the descriptor should be shifted left, counting the number of shifts until a one is shifted 
out of the descriptor. This number oF zeroes should be inserted between the radix point 
and the most significant mantissa bit. The resultc.it fraction can then be used as a fraction 
of full scale voltage. For example, a mantissa of 3213 (onto!) -.id a descriptor of 0000 

J 

would yield a binary fraction of .01101000101 1 of full scale, while a mantissa of 3213 
(octal) and a descriptor of 2000 (octal) would represent a binary fraction of .00011010001011 
of full scale. 

The interface contains two 'ets of DAC's, with each set containing three channels. 

Each channel has a 0- +5 volt output range, with a resolution of 5 mv. The output data 
word for these DAC's has a 10-bit mantissa in the most significant bits, with the two 
least significant bits selecting the output channel. To send an analog signal from the 

r 

computer, the data word is put in the accumulator, then instruction 6065 for set 1 or 
6075 for set 2 executed. The use of each DAC channel by this program is shown In 
Table V. 
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TABLE IV 


CH4 

7 


MSB 

BIT 

Bit 

Q-CH1 

1 -,. 

3- L8 

4- L4 

5- CH2 

6- CH3 

7- CH4 

Restrictions 


CHI W LS L4 CH2 CH3 
0 1 2 3 4 5.6 

Function 

Enable Analog Input Channel 1 

Do not start conversion until 40 msec 

clock pulse. 

Do not integrate more tha'' 8 msec. 

Do not integrate more than 4 msec 
(requires Bit 3-L8 to be set). 

Enable Analog Channel 2. 

Enable Analog Channel 3 
Enable Analog Channel 4 


1. Only one of bits 0, 4> 5, 6 should be set. 

2. To limit integration time to 4 msec, both bits 3 and 4 should 
be set. 
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TABLE V 


Channel (Bits 10, 11 ) 

IOT 

00 

6065 

01 

6065 

10 

6065 

00 

6075 

01 

6075 


Function 

F^2 , Y Channel of X-Y Plotter 
Volume, X Channel of X-Y Plotter 
Sent to Amplifier with a 
Gain of 2, then to DVM. 

To Spriometer Valve Driver 
0000 - Open Valve 

7770 - Close Valve 

To X-Y Plotter Pen Control 

000 j. Pen Down 

7771 - Pen Up 
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A special interface was constructed to allow control of external devices and to con- 
dition analog signals. It is represented schematically in Figures 4 and 5. This interface 
contains a solenoid driver to allow the computer to control the spirometer dump valve, 
a power source for the potentiometer on the spirometer, a buffer amplifier for the spirometer 
potentiometer, and an amplifier with a gain of 2 to boost 0 to +5 volt DAC output for 
display on a 0 to +10V meter, 

PROGRAM 

The computer program for system control, data acquisition, and data analysis 

> 

consists of a group of six modules. Four of which operate on a central data buffer, one 
for mass spectrometer calibration, and one idle loop, as shown in Appendix 1-1 . On 
initiation, the program resets various flags and i/O receivers, opens the spirometer 
valve, and enters an idle state waiting for another module to be called by an unsolicited 
control key-in. This loop is also entered at the completion of other modules. Modules 
called by recognized key-ins are summarized in Table VI, 

The calibration routine samples the mass spectrometer nitrogen analog output every 
40 msec, The sampled datum is then converted to percent, and stored. In addition, * 
the concentration is scaled and output on the DAC for display on the digital volt meter 
(DVM), with 10V corresponding to 100% nitrogen, A P key-in v/i I ! cause a type out of 
the most recently sampled nitrogen fraction. Rapid calibration of the mass spectrometer 
is possible by sampling gas of known nitrogen content. Either an S or CTRL S key-in 
will terminate this routine. 
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TABLE Vi 


Key -In 

Module Called 

CTRL C 

Calibration 

CTRL 1 

Initialize, Clear Data Buffer 

CTRL F 

Forced Vi Lai Capacity 

CTRL W 

Nitrogen Washout 

CTRL R 

Report Data 

CTRL S 

Stop Whatever Module is in Progress, Begin ld| 
1 


The four other modules of this program all operate on a central data buffer. The 
initialization module sets the entire data buffer to zero. 

The forced vital capacity module monitors a single breath, from the point of maximal 
inhalation to maximal exhalation. On initiation, this routine closes the spirometer valve 
and begins sampling spirometer displacement (volume) every 40 msec. Data are not saved 
until a sample above a threshold (120 millivolts) is detected, indicating the beginning 
of a breath. Each sample is then saved sequentially until there is no increase in volume 
for 0,5 second, signifying the end of the maneuver. At this time, the valve is opened and 
analysis begun. First, the sampled data are scanned and the maximum spirometer displacement 
found. This value is converted to liters BTPS and stored in the data buffer as FVC. Then, 
the sample occurring 1 second after the start of the maneuver is extracted, converted to 
liters BTPS, and stored in the buffer as FEV] . Next, elapsed time values for one-quarter 
and three-quarters of FVC are found. The time between two points is determined by the 
number of samples between them and the fixed sampling rate of 40 msec/sample. MMFR is 
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calculated by dividing 0.5 FVC by the time between 0.25 FVC and 0.75 FVC. The 
above procedure is then repeated for 0,2 liters and 1 .2. liters oF the FVC to permit 
calculation of MEFR. The routine then exits to the idle state. 

The nitrogen washout routine incorporares two sepaiate procedures into one subject 
activity. As described earlier, the subject places the mouthpiece in his mouth, exhales 
completely to residual volume; inhales O2 to full inspiratory capacity from an oxygen 
demand regulaior, and again exhales completely. The subject then breathes normally 
until the procedure is completed, Inhaling oxygen, and then exhaling into the spirometer. 

The first analysis procedure requires waveform analysis of the instantaneous nitrogen 
concentration at the mouth versus volume exhaled for the first exhalation after 100% 
oxygen inhalation. The second procedure requires calculating the total volume of 
nitrogen exhaled during 100% oxygen breathing, and then calculating residual volume 
by nitrogen dilution. 

Both procedures involve operations on data pairs of nitrogen concentration and 
volume. A potential problem exists when using instantaneous gas concentration and volume 
data pairs. Any gas analyzer has a delay time required for the gas sample to pass through 
the sample catheter to the analysis chamber and then be analyzed as evidenced by an 
analog output. Because of this delay, analog da L a at the mass spectrometer output 
represent gas concentrations which were sampled in the past. The time delay is relatively 
constant for a given mass spectrometer, but can vary from a few milliseconds to seconds, 
depending on such considetations as catheter length, sample flow rate, inlet rate and electro- 
meter rise time. To avoid a problem in this program, volume and nitrogen are sampled every 
40 msec. The volume sample is used by a spirometer control subroutine but is not used with 
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the corresponding nitrogen sample for calculations. Instead, it is placed at the end 
of a First In, Last Out Queue, and a volume sample taken From the other end of the 
queue. This effectively delays the volume signal by a tirm of N*SI, where N is the 
queue length and SI is the sampling interval, resulting in data pairs which are phased 
in time. The mass spectrometer used in this experiment had a total delay time of 
approximately 500 msec, so a queue of length 12 was used, resulting in a 480 msec delay, 
Upon entry, the module begins monitoring volume/nit rogen data pairs as described 
above. No computations are done until after the first end of breath is sensed by monitoring 
spirometer position as in the FVC module, Because the subject breathes ambient air 
before the first test maneuver, nitrogen concentration concentration at the mouth following 
the end of his first exhalation can be used as the nitrogen concentration in his lungs* 

This nitrogen concentration is stored for later use in calculating residual volume. After 
this initial exhalation of ambient air, no calculations are performed until the next exhalation 
which is the first one Following oxygen inspiration from RV to TLC. All volume 'nil rogen 
concentration data pairs for this exhalation are stored for for later analysis. 

After the subject begins inhaling 100% oxygen, it is necessary to compute the total 
amount of nitrogen exhaled* This accumulation is Initiated by the same logic that 
inltiat-es storing of all dafa samples for a breath waveform. The spirometer control sub- 
routine returns a spirometer displacement of 0 (iters unless an exhalation is occurring. 

Thus, for any 40 msec time period, volume exhaled during the period is simply the 
difference in a volume sample and the previous volume sample, A negative difference occurs 
at the end of a breath, when the spirometer begins returning volume values of 0 liters and 
Is treated as zero volume difference. The volume of nitrogen exhaled during a 40 msec 
period is then computed by multiplying that volume difference by the propei ly phased 
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nitrogen concentration. These 40 msec nitrogen volumes are accumulated from initiation 
until the end of the washout. The criterion for ending the washout is the occurrence of 
two successive breaths with maximum nitrogen fractions less than 0,02, To preclude 
terminating the test prematurely, these two successive breaths must also occur at least 
2,75 minutes after the washout begins. 

After criteria for washout termination have been met, analysis of the collected data 
begins with analysis of the first exhalation after oxygen inhalation. The volume array is 
scanned and the maximum volume located, converted to BTPS liters and stored as Vital 
Capacity (VC). Then volume/nitrogen fraction pairs corresponding to 0.75 liters and 
1 .25 liters are found. The nitrogen fraction sampled at 0,75 liters is subtracted From 
the nitrogen fraction at 1 .25 liters, and the difference stored as N2 delta, or the slope 
of the alveolar plateau. Next, volumes 1.5 liters and 2.5 liters less than the vital 
capacity are found, A linear regression routine computes the best straight line expressing 
nitrogen concentration as a function of volume in this one liter volume. The line is 
extrapolated toward residual volume to locate the last volume/nitrogen fraction pair for 
which sampled nitrogen fraction is less than nitrogen fraction computed from the linear^ 
regression curve using the corresponding volume. The volume from this pair is subtracted 
from vital capacity and the difference stored as closing volume. The single-breath data 
pairs are plotted on an X-Y plotter as nitrogen concentration versus volume. 

Residual volume is computed using a nitrogen dilution technique implemented with 
the following formula. 


RV 


V N9 - .0312 T 

- 0.2 

Fn 2 " F N2 ( fina *) 
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(init) - Initial alveolar nitrogen concentration. 

FN 2 (final) - Alveolar nitrogen concentration after washout. 
Because of the small amount of core memory available, it was necessary to use 
two approximations in deriving this Formula from traditional equations. The factor, 

.0312 T, is traditionally a correction factor based on subject body surface area and time 
of washout. A mean body surface area for the expected subject group Is used with actual 

I 

time of washout to determine the volume of nitrogen washed out of the tissues. The 



constant, 0,2 liters, is an approximation of anatomical dead space. 

The report module computes secondary data from data in the data buffer. Results 
of all measurements are then printed on the teletype. An example of this output super- 
imposed on a single-breath plot is shown in Figure 6. 


IMPROVEMENTS 

Implementation of this system on a different computer would allow certain improvements 
to be realized. The PDP 8-1 used in this system was designed in the mid-1960's, and is 
quite large by current standards. By using a current minicomputer, the size and power 
requirements for the computer could be reduced by 80%, with no loss in capability. By 
using a different A/D conversion system, analog signals could be sampled at a higher rate. 
This would allow better definition of flow rales and the single-breath washout curve. Extra 
memory for program storage and a higher sampling rate would also allow additional 
measurements such as dead space computation and plaiting of flow-volume loops. 
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APPENDIX 1 
Program Flow Cliarfs 
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PROGRAM ORGANIZATION 
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ROUTINE TO 
CaUiulje .:iTRor,K.; 
C'.V.KL OK !U3S SPEC 

called by ctrl c key-i.: 

STOPPED BY CTRL 3 KEY-Iil 


SET UP A 10 
RECEIVERS, ADAIO 
KEY-Itf 



MASS SPECTROMETER CALIBRATION MODULE 
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REPORT GENERATION MODULE 
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FORCED VITAL CAPACITY MODULE 
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NORMAL 

SUBROUTIiHS 

ROUTINE. 

NO BREATH 
STARTED 


BREATH 

STATUS 


A/D INTERRUPT 
A 10 RECEIVER 
FOR FEV MODULE 




STORE NEW 
SAMPLE 
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VCOMF 


siiuro!jti‘:e to 

CC;'F!1TE FEV 
RESULTS 
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INITIALIZE DATA 
POUTERS, FLAGS 
ETC. 


CALLED BY CTRL--W KEY-IN 




CALCULATE 
RESIDUAL VOLUME 



NITROGEN V/a SNOUT MODULE 
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SI. GLK BREAT.: A:!ALYol5 SUBROUTINE 
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APPENDIX II 
Operating Instructions 
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tJ < DISPLAY X LSP# 1-0B1 


DATE S/RS/TH 

PULMONARY FUNCTION 
PREPARnTION 

oss i. contact stdn *0 verify GN 2 , G 02 ,' crl 
GAS, fe VACUUM pump arc on 

2. INTERFACE PANEL:- 

POWER SU - ON 

DVt! - counter fluctuating 

3 . OXYGEN REGULATOR: 

SUPPLY 5 H - ON 

SUPPLY 100 * OXYGEN 5 W - 100 * OXYGEN 

(verify) 

flow sw - normal < verify) 

OXYGEN SUP PL v PRESSURE i nd - 200 + 

25 PS Hi < V " i f y > 

CAUTION 

Follow next steps in exact order or 
Mas;.. spcctroKe ter way vent and pra- 
c l u d c p roper e x peri m e ri t opera t i 0 n 

4 . RESPIRATORY MONITORING ANALYZER: 

BYPASS line v l v (red ham’ led vlv 
on left > - open <90 dag ecu > 

INLET CAPILLARY vlv (red handled vlv 
on right) - open <90 deg cow ) 

ANALYZER POWER SW - ON 
AMPLIFIER POWER SW - ON 
CATHETER SELECT SW - IMLET B 
ANODE CURRENT ADJUST cont - CW till 
Meter ■ reads approx i Mate 1 y 0-10 
m i c r o a t: p s a n 0 d c c u r r e n t 

5 . n f 1 0 r 3 o Min w a r m u p \> e r i o d : 

Turn on Vidr-o 

IOW PUMP CURRENT - 200+50 nir.ro- 

OMps (verify) 
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or> 

0Qa 


PROCESSING 



1-Q02 


OflTI 


6. XY PLOTTER r 

POWER sw - ON <red It - on) 

Place cheri: paper to lower left of 

Remove cap ' f row xy Plotter pen 
CMPRT 5H - ON < arber it - on) 
servo sw - om cawber lx - on’) 

7. COMPUTER? 

power sw <key lock) - on 

e. GO *0 PPOnooM LOADING INSTRUCTIONS 
on page i-S 


9. TTY: ■ 

Depress cntl kev and then c key 
< Maintain; rt? cntl key depressed) 

XY plotter drives to Y = SO': M2 and 
x 3 7 Liters volUMe 

RESPIRATORY MONITORING ANALYZE!?: 

. saMPie calibration gas with known 
FN2 using catheter a <red it - on) 

Note: FM2 of present col bos is 

O.SfiC " 0.002 

RMCCS CURRENT AD .'VST COht - adjust 
until cal etas Ft; 2 ; 3 observed on 
INTERFACE PANEL DVM OOd/’Or on 
TTY after depressing the p key 
CATHETER SELECT SW - INLET S C green 
it - on) 


I©. ReMove blue and gold respiratory hoses 
fron stowage and attach blue hose to 
OXYrn •• : 'jFr LY tv ? Ok d « SO -jr? ;ot arid 
gold hose to SXriSLATiOi'i HOSE quick 
disconnect. Attach other ends of 
hoses ■‘*0 viv assembly. Attach Mass 

v» • • w. .■ ■ ^ ,Y|". ^ - ‘ * • . i*. » i ** • « T ,l * '■ ‘il 

to l y . £ iUCh resp t p a*: cry ViV w i ■: .i '~jZ 

ys i r.<* Tt;s r MAVK roS i t i Oh 0*1 02 
regulator 


9X23X7H 
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1~0©3 DATE 9/27/7* 

8‘JBJT U. Sit in front Of RESPIRATORY VLV 
ASSEMBLY 

12. W®shgut_Test 

OBS TTY: 

Depress cntl key end then 1 key 
(Maintaining cntl key depressed) 

Depress cntl key and then w key 
(Maintaining cntl key depressed) 

SUBj Place nose cianr on 

inspire i con air,' hold breath, then 
place: oou thp i .iiwO in MOUth dtld SCSI 
1 i ps over Mouthp i ece 
Exhale slowly to Residual voiuwe <RV), 
i nsp ; re '■>' \ ta i Capac ; ty < vc > of 
oxygen and again exhale to ev < io~ 

IE sec) 

Following initial Maneuver, relax and 
breaths norr-toiiy until washout is 
comp l etc. washout »s complete when 
XY Plotter autoMat • cal ly plots out 
single breath washout test, care- 
fully reMOvc rasa spectrometer Cap- 
a ll l ; f- • . c i tror^est hi u e h o s e s $ 
vtv asscMbiy and stow 

i 

13. corcod_V2ta^_Capac^ty_ie5t 

DBS TTY: 

Depress CNTL key and then F key 
(Maintaining cntl key depressed) 

Place fvc hose and cardboard Mouth- 
p iece c n sp : r o •. cc ir 

SUBJ Net cardboard Mouthpiece with tongue. 

Hold Mouthpiece hose assembly to 

er, I f *f “r i*, v ■ ir\i • /-»-, w , ; r>n nv 

air, t;OK .liT'O ’■ i 1 V hold ive , s ::-a . 

I i ns on Mounts ; ece. then forcibly 
exhale to rv. Both flow and voiuMe 
should be at Maxi mum effort 
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1-004 


DATE 10/02/74 


OSS 14. Prj.nt_Report 
TTY: 

Depress CNTL key and then R key 
(Maintaining CNTL key depressed ) 
Annotate printout with nawe of subject 
and date 
Turn off Video 


POWERDOWN 
OSS 1. TTY: 

Slide TTY into storage position 

2. XY PLOTTER: 

SERVO SW - OFF 
POWER SM - OFF 

Put cap back on XY Plotter pen 

3 . RESPIRATORY MONITOR IMG ARAL V/TR: 

GNOME CURRENT ADJUST COMt - 0 
CRT METER SELECT SH - REMOTE 
AMPLIFIER POWER SM - OFF 
ANALYZER POWER SM - OFF 
INLET capillary viv < red handled 
vlv on right? - close <30 deg CN > 
BYPASS LINE vlv <re:,' handled vlv on 
left) - close <so deg c;*i > 

4. OXYGEN REGULATOR: 

SUPPLY SM - OFF 


5. INTERFACE PANEL: 

POWER SW - OFF 

s. contact stdn to verify go?, gn2, cal 
gas, fc vacuuw pump are off 


7. clean washout valve and wouthp » erg with 
sterile wipe an d s t o w 

9. Stow FVC hose, discard cardboard wouth- 
P iecc an d d e b r i e f exper- i m a n t 

***■ Common d cowpleted. *** 


£%?£££ 
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1-005 DATE 9 / 23/74 

PRgGRgM_LgogiND_lNSTRyCII OHS 
M 2 ! 2 iD 3 i_startup 

NOTE; After nortinal shutdown prograw w'i 1 1 
still be in MSMory , 

1 .. 81 N 6 STEP sw - norMai <tcp of sw depressed) 

2 . SIND INST sw - norMai < top of sw depressed) 

3 . Put 200 <000 010 000 000 ) in SWITCH 

8 

REGISTER 

4 . Depress LOAD ADD 

5 . PROGRAM COUNTER < PC ) Should contain 290 

8 

6. verify high speed paper tape reader is 

disengaged < sprocket cover up) 

7 . Depress start 

prograw should be functioning correctly 
<PC holding at 213 - 000 010 ggi oil) 

8 

> 1 * if prograM is not functioning correct-* 

* ly proceed to Loading Si nary Tapes * 

* procedure below * 


LSi'yiOS-iiQSCy^Tapes 

NOTE; If BINARY LOADER is in MSMOrV, proceed 
to sten 1 below, if binary loafer is not in 
m cm o r y » ►* c c c c . to L 0 a d * ng B i n 3 •' v l 0 a ci e r 
procedure on page 1-7 

1 . Put 7777 c 1 .1 1 til Hi ill) in SNITCH 

P 

REGISTER 

2 . Depress LOAD ADD 


•SKfig? 
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1-0G6 DATE 3K2 3/7H 

3. PROGRAM COUNTER Should read 7777 

8 


H. Place paper -tape float ;nci point package 

< DIGITAL 8-25-F-BIN, FLOAT INI PACKAGE 2) 

; n reader, with arrow up, point inti, froM 
right to left, sprocket holes over 
sprocket, and tape leader over read 
head < leader is the portion of tare 
with two rows of holes, one at the front 
side of the tape? 

5. Depress start 

* If tape does not read to data portion * 

* of tape, depress stop, load add, * 

* then START * 


6. Tape should read to end and reader stop 

* if tape does not read, perforw Loading* 

* Binary Loader procedure on page 1-7 * 

7. When tape stops, LINK should be i lamin- 

ated, and all accuwulator lights 
should be out 


S. 
' 9 . 

10 . 


* if not, a parity error occured. 

x* start over on step l of Loading 

# • Binary Tapes Procedure on page i-s 

ReMove tape froM reader 

Place pft progreM paper tape in reader, 
with arrow up. pointing frow right to 
left, sprocket hole:- * s"ro( 
and tspo loader over read head 


verify 7777 <111 m in in > in switch 

£ 

REGISTER 


* 
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1-007 


DATE SV23/74 


li. Depress load add 


12 , 


13. 


1H. 


PROGRAM CO' ER should read 7777 

e 

Depress start » 

Tape should read to end and reader stop 

* if tape does not read, perforw 

♦ Loadin'? Binary Loader procedure 

# below 


* 

« 


is. When tape stops, LINK should he illumin- 
ated, ar:;' all accumulator lights 
should be cut. 

* if not, a parity error occur ed. # 

* sta^t o w er on step l of Loadin'? 

* Binary Tapes procedure on page l-E* 

IS. Remove tape froM reader and rewind by hand 

17. Proceed to NoMinai Startup procedure 
on page 1-5 


!=2S^iDS_§iD§!2i_!=2i!^!:C 

NOTE: Loading BINARY LOADER requires de- 

positing and examining data in Memory 
us i ng the pane i sw i tones 

MEMORY CHECK TO SEE IF RIM LOADER IS IN 


CORE 

1. PUt 775S <111 

111 101 no 

in SWITCH 

8 


- 

REGISTER 

2. Depress L ?•' 

ADD 


3 . Verify 773S i 

n PROGRAM COL” 

■iTER 

3 




***** «£*•» 
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1-G08 DATE 9/23/74 

4. Depress exam rcreatediv © n d verify the 
follow in? memory buffer < M3 > readout 
sequrrce. I' 1 vorj^v ^ails. n^r^om 
TO CHANGE H SINGLE LOCATION procedure 
on page 1-9 

MEMORY BUFFER < MB ) 

72G0 cm 01© 000 000? 

3 

6Q1 1 < 1 m ©00 QPi ooi > 

3 

5357 <101 Oil 101 Hi) 

R 

6012' C HO ©GO ©Cl ©10) 

8 

71©6 Clll 001 000 110) 

8 

7006 Clll ©00 oeo 110) 

8 

7510 'Clll 10.1 001 000 ) 

9 

5374 <101 OH 111 100) 

3 

7006 Clll 000 GOO 1 1G ) 

8 

6011 C 11G GOG 001 031 ) 

8 

5367 C101 OH HQ 111) 

8 

6012 C110 ©SO GGl OiO) 

' 8 

7420 <111 1G0 OiO GOO ) 

8 

3776 CGli 111 111 110) 

<3 

3376' COll 011 Hi HO) 

S 

5357 C101 Gli 191 111 > 


5. Put 7756 Clll 111 101 110) in SMI 7 CM 
8 

REGISTER 
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1-QS9 DATE 9/23K74 

6. Depress- load rod 

7. Place BINARY LOADER paaer tar« in 

reader, with arrow u->, pointing froM 
r i ght -to left, sprocket holes over 
sprocket, arid tape leader over read 
head < leader is the portion of tape 
with two rows of holes, on at the 
front side of the tape) 

8. Depress START 

9. Tape will read coMPletelv through 
le. Depress 'stcr 

11. Go to Loading Binary Tapes procedure on 
page 1-5 


TO CHANGE A SINGLE LOCATION 

1. Put address in switch register 

2. Depress load add 

3. put data in switch register 
h. Depress dep 

5. Return to MEMORY CHECK TO SEE IF RIM 
LOADER IS IN CORE, page 1-7, step 1 


TO LOAD ENTIRE RIM LOADER 

1. Put 77 SC <111 111 121 110 > in SWITCH 

8 

REGISTER 

2. Depress l:a add 
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DRTE 9/23^74 

3. in seorunnce ■Tor the fouling, verify 

PROBP.PM COUNTER i<S C,Of‘ r 079, Set SMI-ITCH ■ 



fu:o i 

8'! I:.,? 

-'.r» cor 

i s * ‘ ! *V * f * * T ‘ 

, cl 7, 

pj ^ 2 ■ *> 


PROGRAM 

C0UK1 

EP 

SI’IITCI-J 

REGISTER 

77S6 an 
8 

in 

101 

110) 

72D0 <111 
8 

010 

000 

000> 

7757 <111 
8 

7760 <111 
8 

ill 

101 

111) 

6811 <110 

000 

091 

001 > 

111 

118 

000) 

8 

7357 <101 

0 ' 

Cl t 

191 

111) 

- 7761 <111 
8 

7762 <111 
8 

111 

11® 

001 ) 

6012 <110 
P 

000 

ft * 

010) 

111 

1 1G 

010) 

7 1 06 < ill 
8 

091 

030 

110) 

7763 <111 

Q 

1 i 1 

1 10 

Oil ) 

7006 <111 

'009 

0 90 

1 19 ) 

7764 <111 
8 

1 1 1 

110 

100) 

8 

7510' <111 
3 

101 

091 

GOO > 

7765 <111 
6 

7766 <111 
8 

111 

110 

101 ) 

5374 < 101 
8 

911 

ill 

ICO) 

ill 

110 

1 10) 

7006* < 111 
3 

090 

COO 

110) 

7767. <111 
8 

11 1 

1 10 

111)’ 

601 1 < 1 10 
8 

OCO 

001 

GO 1 ) 

7778 <111 
8 

111 

1 1 1 

000 ) 

5-767 <101 

ail 

■ 19 

111 ) 

7771 <111 
0 

111 

1 1 1 

r.pi ) 

8 

6012 < 110 
P 

7420 *’< 111 
3 

099 

001 

019) 

77“'2 <111 
8 

111 

111 

010) 

100 

010 

oeo) 

7773 <111 
8 

777* (HI 

p 

11-1 

111 

Oil ) 

3776 <011 

rt 

111 

ill 

110) 

1 1. \ 

1 i * 

4 00 ) 

M 

**> 

9! 1 

1 1 1 

\ i n > 

7775 "*< 1 1 1 
8 

111 

111 

101 ) 

5357 < 101 

O 

O 

0 11 

101 

ill) 

1. Pe 

rfon 

pass 

h Le/ 
1-7 

•:i i 8 

i r *ry 1 . 0 •**■«!• 

2\- 0*1 
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APPENDIX 111 
Program Listing 
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/TULMONRRY FUNCTION TEST 


FRL8-V9B L’/Hl/74 PAGE 1 


/PULMONARY FUNCTION TEST . 

/HfiBDWRBE-PDP“8LFEBKIN ELMER MASS SPEC.SFiROWETER 
/ XV PLOTTER, Ml 


/ 

DEFINE NEW INSTRUCTIONS 

1000 

F1XMRI FADD=1800 

zom 

FIXMRI FSUE=2090 

3000 

FIX, "'SI FttPY=>3008 

3000 

FCSSI FMUL-3000 

4000 

FIXMRt FDII/-4080 

5000 

FIXMSI FGET=S000 

6809 

F I'TSI FPUT«6009 

0009 

TEXT *0900 

7603 

FHORM»7000 

0000 

FEX IT-0930 

6537 

SAMPLE -6537 

6365 

DAO *6965 

4407 

FEMTER-4407 

750! 

MQA-750I 

7421 

MOL *742 I 

6075 

CTRL *6075 


/DESCRIPTION OF SOME SUBROUTINES 
/CONWST 

/ENTER WITH MANTISSA IN MS. EXPIFRCM AD) 
/IK PC. RETURNS 123 IT UNSIGNED UMBER 

/!H AC 

/"UNPACK 

/ENTER WITH 12 BIT UNSIGNED NUMBER IN AC 
.'RETURNS WITH FPAC CONTAINING NORMALIZED 
.'FRACTION CORRESPONDING TO AC/4096 



miLtf QMftSY FUNCTION 

TEST .PaLS-t'Se M40I474 prse 1-1 
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EJECT 

48 


0001 

#1 

4S 

00001 

5462 

Jtl? 1 .+1 

58 

51 

52 

08802 

1000 

SEPTIC 

53 


9005 

*5 

54 

80005 

7480 

7400 

55 

00006 

7200 

7200 

56 

57 
S3 
59 

60007 

5600 

5608 

60 


7345 

*7345 

61 

07345 

3416 

3416 

62 

63 

64 

07346 

5744 

5744 /PATCH TO FPP FOB OUTPUT 

.'VTO AUTO INDEX REG 16 

-•'FOB USE WITH LEAST SOURCES ROUTINE 

65 


8328 

*29 

ti6 

00020 

08SO 

N, e:C;3 

67 

06021 

9080 


68 

00828 

0900 


69 

60023 

3000 

EXY,0;0:3 

70 

00024 

3000 


71 

00O25 

0080 


72 

00026 

0000 

EX,0;0tb 

73 

00027 

0880 


74 

00839 

3898 


75 

960^1 

0000 

EY, 0:8:9 

76 

00032 

0009 


77 

80037 

0800 


78 

00034 

8860 

EX2 8:3:0 

79 

80035 

3080 


80 

00036 

0009 


31 

82 

83 

34 

35 
86 
87 


0865 

*65 

-'DEFINE SO? IE SU2ROUTINE CALLS 3Y MNEMONICS 

S3 


4465 

UNPACK -JM? t .:Wp2?LT 

89 

00085 

? 144 


30 


4466 

FO*JT=JMS I FOUT3 

91 

’38086 

8213 


92 


4467 

S?IB(WMS ! . ;S?I20S 

93 

83037 

04*30 

BEGIIWMP I .ilHIT * 8 § 

B7PS-JK3 I . :BTPSR C? © 

94 


547 0 

95 

00078 

8200 

96 


4471 

97 

e007! 

1732 

Q §} 

98 


4472 

FTX-JMS I , JFIXX & 

93 . 

80672 

1536 

100 


4473 

BERDY*.7MS 1 . : RPTCK C? fy 

101 

00073 

8557 

F* £> 

qt*m 



nJLTOSARY FUNCTION TEST 


PfiLSH/SB 11^2 W4 PAGE it -8 


[02 


4474 

FLOAT- JMS I . ; FLTE 



103 

00074 

2152 




104 

00075 

8808 

MSG!, . -a 



105 

00076 

0000 

MSG2, 0 



100 

98S77 

0888 

MSIPK. 0 



:97 

08100 

8000 

MS2PK> O 



98 




^15GI>«SG2 POINT TO PIES SAGES IN QUt, 


:0S 




.415 1FK, NSHPtt SAY IF PACKED ASCI l OR NOT 


:i6 




/0 PACKED, 1 NOT PACKED 


: n 

00101 

1026 

XITPTr XIT 

.'POINTER TO EXIT FROM INTERRUPT SERVICE 


112 

08102 

1043 

FRSMG, TTOH 

/•ENTRY POINT 


1*3 

00103 

6090 

KEVIN, 6 

/A 10 RECEII7ER FOE UNSOLICITED KLY-IN. NON 

CTRL 

114 

00104 

0114 

WAITPT.WAIT 



1 15 

00105 

3547 

FJRTBT, FKTBKR-i 

/•FOE USE USING FPP TYPE OUTS. PUT INIS IN 

13 

L 16 

00106 

0008 

INPUT, 0 

/KEY IN BUFFER 


117 

00107 

0D77 

K77, 77 

/A CONSTANT 


13 

mi IQ 

0300 

LfiSTSM, 3 

/WHICH CHANNEL WAS SAMPLED LAST 


;is 

60111 

1026 

ADA 10, XIT 

A 10 P.CS2 FOP. A-D 


.20 


45 lc 

OUTPUT-INS I . 



21 

061 !2 

0657 

ftGFT, MESSStS 

/POINTER TO OUTPUT SCHEDULES 


22 

001 13 

0620 

N25AM, 620 

/CONSTANT TO SELECT AD CHAfINEL N2 


23 



DELAY, 



24 

00114 

2803 

l4RrT#28G* 

/SAYS WAIT FOR 40 MSEC CLOCK TO SAMPLE 


25 


4515 

COM-'RT I -:AD21WD 



26 

0*7 

80115 

0474 




Z.( 

28 






23 






130 

001 IS 

77 74 

K7774, 7774 

/MASK FOR DnC, CHANNEL SELECT IN OTHER BITS 

31 

00117 

0003 

K3>3 

,'A CONSTANT# A. ^0 CHANEL FOB DKM OUTPUT 


32 

08120 

7455 

NINUSS, -323 

/HEGATIl^E OF ASCII 3. USED TO STOP VARIOUS TESTS 

33 






34 






35 






36 






37 






33 






39 

88121 

0800 

EXP, 3 



J9 

80122 

2003 

TONTIS.B 

7R BUFFER FOP PD DATA AND CONt/FT 


41 

80123 

0980 

n 



42 

0Hi.:4 

00G2 

2v53'2006t0030 



43 

co:~3 

2000 




44 

08:3? 

0933 




45 




/5'/ GI'/ES I.7P545X189 *M£ 


43 

00 1 2” 

3800 

KALI'S, 8 



47 

001^8 

{Vjrfi 

OPEN. 0 



43 

00 iZ { 

7773 

CLOSE, - 778 



49 

30132 

4; SO 

KOLUHE.43C0 



58 

O0i33 

i?£02 

0l7K, 2 



51 

G0134 

, CT - 
* i «_ 

moo?,L jopad 



52 

00135 

49C9 

U'STAST# LATA 



53 


4536 

FLTWL-jr* l - 5 3D2V9L 



54 

00 136 

1 ^37 




.55 

00 /jr 

t>-3 13 

F2047,Q813_ 



56 

OB 140 

j/ + * 

-• ! 1 





/PULnOKftt?Y FUNCTION TEST 


U/21/74 F3GE l~3 


157 

153 

153 

160 

161 

162 

163 

164 

165 

166 

167 

168 

169 

170 

171 

172 

173 

174 

175 

176 

177 
173 
179 
130 
181 
132 
183 

134 

135 
186 

187 

188 
189 
133 
191 

132 

133 

194 

195 


0314! 

7777 

7777 

00142 

0309 

ITHI.O 

88143 

0600 

l/FLO, 8 

0U 144 

0060 

FKAC, 0:3:0 

00145 

90C0 


00146 

0000 


00147 

7462 

MINIJ3M, -319 

00158 

0003 

t'LFKlO, 3?3109;0000 

80151 

3100 


0Q152 

0000 



/CONSTANTS 5EOM HEFE ON OUT U$E!> 3Y W83HCUT SOUTINE 
/NO STORMS LEFT AT THAT ROUTINE 


8Q*57 

3380 

S/SKEY, 9 

0GI54 

8007 

i/HKEY, 9 

38:55 

0Q8S 

1/^77, 

88156 

0803 

NTliViL,'9iC;1 

08137 

C003 


68168 

00BS 


00 16 1 

2649 

DUMSAD# 2640 

00 J 62 

5323 

I^STOESj- 5323 

00163 


MS TOP £.5350 

00164 

5377 

NLAST.5377 

00165 

5350 

NSTAPT, 5350 

00166 

5347 

HH.flST.5347 

0016? 

5320 

V? TEST* 532Q 

08170 

53 1 7 

NWL3T- 3317 


5317 

MWLST!*5S17 

90:7! 

455 > 

WN9T?,?. 4=.58 

50! 72 

3777 


08 5 ?3 

5007 

FI S3 - 7 :3 IC2 

6017-1 

3190 


08175 

9070 



4 J 1 T* 

3flai2».Tr-SS I 

SDI76 

1534 




'PULMONARY FUNCTION TEST 


PftLS-V'SB il/Zl/7*- PAGE 2 


196 9208 *200 

19? 

193 

199 /PROGRAM INITIATION 

200 /'ALSO. RETURN FROM DIFFERENT MODULES 

201 
202 


203 

00200 

7206 

1N1T,CLA 


204 

00201 

7200 

CIA 


205 

00202 

6002 

I OF 


206 

002CT 

1130 

TAD OPEN 

/OPEN VALVE 

20? 

0020^4 

o0?5 

CTRL 


208 

002S5 

3127 

DO h VALVF 


209 

G02O6 

1 134 

TAD ADLOOP 

/CLEAR A 10 RECEIVERS 

210 

00207 

3in 

DCA ADA IO 



00210 

3163 

DC A KEVIN 


212 

002 1 ! 

6001 

I CM 

/THEN ’DM INTERRUPT 

213 

00212 

5212 

JMP . 

/IDLE 



/FULNQNfiRY FUNCTION TEST 


PAL8-*/9B 11/21/74 PR Si. 2-1 


214 



EJECT 



215 

90213 

m je 

POUTS, 0 



216 

00214 

3862 

DC ft 

62 

/C<551*e HO CSLF 

217 

00215 

701O 

EAR 


/HOT -8 CBLF 

218 

002 16 

3055 

DCfl 

55 

/C<62! “^DIGITS 

T 13 

00317 

1235 

TAD 

STGSP 

/WHERE TO PUT THE ASCII 


00223 

30 1€ 

DC A 

16 



00221 

1076 

TAD 

MSG2 


j 

08222 

7648 

SZA 

CLfi 


.. . > 

00223 

5221 

Jr;? 

+ -2 

/BUFFER EEftUY 


226 

227 

228 

229 

230 


231 

00224 

4406 

JM3 I 6 

232 

00225 

7308 

CCh CL l 

233 

60286 

3416 

DC* I 16 

234 

00227 

7201 

CLS I AC 

235 

09230 

7010 

RAP. 

236 

0023 1 

7201 

CLh iac 

237 

03232 

1235 

TAI* 5T0RP 

238 

00233 

4512 

OUTPUT 

230 

06234 

5613 

JMP 1 TOUTS 

240 

06235 

3547 

STORP, PRTBFR- t 


241 

242 

243 

244 

245 




r F ULMOHBSY FUNCTION TEST 


FRLS-V3B 11SZI ST A FftGE S-2 


246 


24? 


248 


245 


250 


251 . 


252 

88236 

253 

80237 

254 

00240 

255 

00241 

256 

00242 

257 

00243 

258 

00244 

259 

00245 

260 

00246 

261 

86247 

262 

88250 

263 

0025 1 

264 

83252 

265 

08253 

266 

86254 

26? 

60255 

268 

00236 

269 

00257 

2?0 

60263 

271 

30261 

272 

03262 

273 

06263 

274 

80164 

275 

00265 

276 

• 66266 

277 

002S7 

27S 

06278 

279 

0827 : 

239 

C0272 

281 

00273 

282 

00274 

283 

60275 

234 

6027A 

285 

06277 

236 

00309 

23? 

O0331 

283 

00332 

239 

83333 

220 

00334 

291 

00385 

292 

60306 

293 

80307 

294 

90310 

295 

60311 

296 

08312 

297 

08313 

293 

80314 

299 

60315 


EJECT 


/ROUT I HE TO FEINT OUTPUT OH TELETYPE 


730Q 

3103 

1134 

3111 

4 777 ' 

1315 

704} 

3314 

1312 
3010 
1311 
30 i t 
1310 
3012 

1313 
3813 
1307 
3306 
7380 
4473 
1410 
4512 
4407 
5706 
0000 
2306 
2306 
2366 
7383 

J4i 1 

7421 
1*12 
4436 
7303 
4473 
141 j 
■±5 12 
2314 
5260 
3473 
3080 
1288 
61522 
8540 
0732 
1153 
3080 
0016 


REPORTS, 

CLA 

CLL 


DCh 

KEVIN 


YAD 

9BLOOP 


DCh 

8DAIO 


JMS 

HUX 


TAD 

NIMCUT 


CIA 



DCft 

OUTCT 


TAD 

NfiMESP 


DCA 

19 


TAD 

FRP 


DC A 

11 


TAD 

DIG? 


DC A 

12 


THD 

UNIT? 


BCfi 

13 


TAD 

BAPT 


DCA 

DATUM 

CH^PV, 

CLA 

CLL 


READY 


TAD 

i m 


OUTPUT 

FENTE2 


FGET S DATUM 
7 EX IT 


/SUBROUTINE TO COWUTE DERIVED VARIABLES 

/SET EXIT LOOP COUNTER 

/SET POINTERS TO FORMAT OUTPUT 


/GET LABEL 
/PRINT IT 

/GET DATUM 


52 DATUM; ISZ DATUM; 13Z DATUM 


CIA CLL 
TAD I \ I 
MOL 

TAD I 12 
FOOT 
CL A CLL 
READY 
TAD I 13 
OUTPUT 
153 OUTCT 
JMF OVE3V 
BEGIN . 

DATUM* 3 
MPT* RV 
D IGF, DIG- 1 
FRP.FR-1 
NAMESF^ NAMES- 1 
UN IT?* UN IT- 1 
OUTCT, d 
NUMvUT* 16 


/GET Y OF FX,Y FORMAT 
/FLOAT IMG POINT OUTPUT 


/GET UNITS 
/PRINT THEM 
/THROUGH? 

,MO 

/YE $, BEGIN IDLE 



-'PULMONARY FUNCTION TEST 


PRLS-t'SB IIS21S74 PAGE E-3 


300 



EJECT 

30 i 




302 




303 




384 




305 



/NEW SUBJECT ROUTINE 

306 



/CALLED BY CTRL- I KEVIN 

387 



/CLEARS DATA BUFFER 

388 




309 




318 




311 




312 

00316 

7380 

HEWS, CLA CLL 

313 

60317 

1335 

TAD NSWFT /PRINT “NEW SUBJECT 

314 

00320 

4512 

OUTPUT 

315 

00221 

7240 

CL A Ctt} 

3 lb 

08322 

1307 

ThD part /set pointers 

317 

□8323 

3016 

Orq 10 

313 

‘ 00324 

1315 

TAD NUMOUT 

319 

66325 

7041 

CIA /AND COUNTER 

323 

88326 

3314 

DCA OUTCT 

321 



/CLEAR A VARIABLE 

322 

00327 

3410 

NEWSS.DCA I 1 0 * DCA 1 18;DCA I 10 

323 

00338 

3416 


324 

00331 

3410 


325 

00332 

2314 

IE2 OUTCT .-THROUGH? 

326 

00337 

5327 

JilP HEWSS /NO 

327 

00334 

5470 

BEGIN /YES* 3EGIN IDLE 

328 

00335 

0762 

NEWPT> NEMMG 
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329 



EJECT 


330 





331 





332 





333 



/ROUTINE TO SCALE DATA 

AND COMPUTE SUMS FOR LINEAR 

334 



^REGRESSION FOE USE IN 

CLOSING VOLUME CALCULATION 

335 



/ 


336 



/X-WLUME 


337 



/Y e NITE06EN FRACTION 


338 



s 


339 



''ENTERED WITH SAMPLED N2 IN MQ, SAMPLED VOLUME IN AC 

340 





341 

00336 

8800 

SUMS, 9 


342 

00337 

3372 

DCA XHOLD 


343 

00340 

7501 

mqa 


344 

O0341 

4465 

UNPACK 


345 

€0342 

4407 

F ENTER 


34$ 

00343 

3124 

FMUL H2PR1S 

/CONCERT NITROGEN TO FRACTION 

347 

S0344 

6144 

FFUT FKAC 

/SA17E 

343 

0S 3 45 

103 1 

FADD EY 

/ADD TO SUM V 

349 

0034$ 

6031 

F5UT EY 


353 

€0347 

0000 

FEX IT 


351 

C0350 

1372 

TAI XHOLD 

/CONCERT l/OLUMZ TO LITERS 

352 

3G35 1 

4536 

FI 1VOL 


353 

03352 

4471 

l* TP o 


354 

00353 

4407 

FEN TER 


355 

00354 

6121 

FFUT EXP 

/spite 

356 

00355 

1026 

FADD EX 

/SUM X 

357 

0035G 

6626 

FFUT EX 


353 

00357 

5121 

FGET EXP 


359 

1*9360 

3121 

FMUL EXP 


360 

00361 

1034 

FADD EX2 

/’SUM X**2 

361 

00262 

6034 

FPUT 3X2 


362 

00363 

5121 

FGET EXP 


363 

00364 

3144 

F *UL FKAC 


364 

€0365 

1023 

FADD EXY 

/SUM ;<Y 

365 

00366 

6023 

FFUT EXY 


366 

€8367 

0000 

fe;:it 


367 

80370 

2621 

1 31 H+l 


36P 

m:r i 

5736 

JM? I SUMS 


369 

O0372 

0000 

XHOLD, 8 
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370 

00377 

1341 




373 


0400 

*400 



372 

80400 

0803 

SPIROS, 

& 


373 






374 






375 






376 






377 






378 






379 






380 






38 i 






382 






383 






334 






385 

00401 

4515 


CONVRT 

386 

03-402 

3266 


DCA 

t-TEMP 

307 

0O 4Q 3 

7160 


CLL 


338 

00404 

1266 


TAD 

{-TEMP 

339 

00405 

70 16 


RAF: 


390 

00406 

7421 


MQL 


391 

G0497 

7200 


CL A 


332 

O0413 

7501 


MCA 


393 

0041 1 

1270 


TAD 

VTHKSH 

394 

00412 

7716 


SPA 

CLA 

395 

00413 

5253 


JMP 

{/BELOW 

396 

00414 

I 127 


TAD 

VALVE 

397 

00415 

7041 


CIA 


398 

0041b 

1138 


TAD 

OPEN 

399 

00417 

7650 


SNA 

CLA 

400 

00420 

5600 


JMF 

[ SPIROS 

401 

00421 

7501 


MQA 


402 

00 122 

7041 


CTh 


433 

00422 

1265 

TAD ’/LAST 


404 

00424 

1273 


TAD 

i\ 1 0 

405 

60/35 

7700 


SIT-, 

CLA 

JQG 

so4r~ 

52^1 


JN? 

NOCHG 

407 

CO 43 

1272 


TAD 


408 

00433 

3271 


pen 

VfcOTCK 

489 

05431 

7501 


MCA 


410 

30432 

3245 


DCm 

YEAST 

411 

00437 

7230 

OK. 

CLh 


412 

00 434 

1266 


■ TAD 

VJEMP 

413 

40475 

2200 


[31 

3“ r POS 

414 

00.436 

22 O 0 


t c 

s? irOG 

415 

CU4T7 

5660 


jri? 

I SFiROS 

416 

00440 

7200 

NOCHG, 

C i_.ri 


417 

30441 

327 3 


182 

M4ATCH 

418 

C 0 ~-^ 

5433 


JMP 


413 

60 A*! 3 

1 138 


TAD 

OF EH 

423 

60444 

80 i 5 


CTPT 


421 

C0445 

3 1 27 


DC A 

Valve 

422 

00446 

2300 


132 

3f TROS 

42" 

06447 

5608 


t Jt ID 

I SFIFQS 

424 

03450 

1 127 

i/BELCi'J • 

TAD 

VALVE 


/ENTER THIS SUB AFTER 
/MONITORING POSITION. Q-iW CHANNEL 
/WITH MANTISSA IN MQ, EXPONENT IN AC 
/ENTER WITH INTERRUPT OFF 
/EXITS 

/f.NORMAL-SPIRO DUMPING 
/OF BELOW THRESH 
/a. NORMAL* l EOS 
/JUST OPENS VftU-’E 
/3.G0C© DATA IN AC 
/THIS DATA P.ETURNDE IN AC 
/AS A 12 BIT POSITIVE NUMBER 
/WITH 7777 INDICATING 10 V 
/MAKE ONE WORD 


/SCALE RIGHT FOR MANIPULATIONS 
/SA/E POP, LATER USE 


/IS SPIROMETER FULL’.' DUMP ED? (BELOIT THRESHNOLD) 
/Y^S 

/IS VALVE OPEN? (DUMPING) 

/(SPIRO ABOVE THRESH TO BE HERE) 


/YES VALVE OPEN SO DURING* NORMAL EXIT. V=0 
/NOT DUDfP I MG SO EXHALATION IN PROGRESS 


/SAMPLES W ft SOM HITH NO 
/MORE THAN 16 COUNTS CHANGE 
/TORE THAN 1* CIS INCREASE SO 
/RESET COUNTESS 

/AND COM? PR ISON VALUE 

/GET VALUE 

/AND EXIT TO NORMAL +2 


/NOT PROVED TORE THAN 10 CTS 
/I: IT 10 TIMES IN A PQV??? 

/NO- TAKE BPEATH IN PROGRESS EXIT 

/YES. END OF BREATH 

/OPEN VALVE- SALT VALVE STATUS 

/TAKE NORMAL + I EXIT 

/CCMSS HERE IF MR S DUMPED 



/FULMOHAEY FUNCTION TEST 


11/2 i S?4 PAGE 3-1 


425 

00451 

7041 

CIA 


426 

00452 

lir 

TAP 

OPEN 

427 

00453 

7 l : • 

SZA 

OLA 

423 

00454 

5608 

JMP 

I SPISOS 

420 

00455 

7200 

VCLOSE, CL* 


438 

0045*5 

1272 

TAD 

KWA1T 

431 

00457 

3271 

Dr *4 

1 'WATCH 

432 

00460 

3265 

DCh 

HAST 

433 

0046 1 

1131 

TAD 

CLOSE 

434 

00462 

6075 

CTBL 

435 

0046? 

3 12? 

PCA 

VALI/E 

436 

00464 

5600 

•J?' D 

I SPIBOS 

437 

00465 

0000 

HAST, 0 


433 

00466 

G080 

i-TTH?. 0 


433 

00407 

0000 

WSHIFT. 0 


440 

00470 

775 * 

1/THESH, -24 


44J 

00471 

0800 

17WATCM > 0 


442 

00472 

7770 

KS*SA IT- 7770 


443 

0047.3 

0094 

K 10. 4 



/IS 1/ftLi^E OPEN 77 (DUMPING) 

/NO. I/AU'E CLOSED, WRITING FOB KREATH, EXIT 
/YES, HALVE OPEN. 

/BESET POINTERS 

/CLOSE UALI/E 

/EXIT 
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444 



EJECT 



445 



/ROUTINE TO 

P8CK ft/D 

446 






447 






448 






449 






450 






451 

00474 

0909 

AD21WD. 

8 


452 

00475 

3266 


DC A 

KTT7P 

453 

00476 

3267 


DCA 

USH I FT 

454 

00477 

1266 


TAD 

I/TEM? 

455 

00590 

7458 


SMfl 


45G 

08501 

5320 


JM? 

HOSHFT 

457 

00502 

2267 


I _ . 

/SHIFT 

458 

00593 

7004 


RftL 


459 

80594 

?4£EJ 


SKL 


460 

00505 

5302 


JMP 

-7 

461 

09506 

7290 


Cl A 

CLL 

462 

00507 

1£?7 


TAD 

t 'SHIFT 

463 

00516 

7041 


CIA 


464 

005 1 1 

3267 


DC A 

V'SHIFT 

465 

80512 

7501 




466 

30513 

7im 


rr t 


46? 

00514 

70 19 




468 

80515 

2207 


rsz 

I/SHIFT 

469 

00516 

5313 


JMP 

— ^ 

470 

00517 

7421 


me 


471 

0Q52O 

73G0 

NGSHFT, 

CLh oil 

472 

30521 

750i 


MCA 


473 

00522 

5674 


JilP 

i maim 


DATA INTO ONE WORD 

/ENTER WITH EXPONENT IN AC 
/MANTISSA IN MQ 
/RETURNS ,2 BIT NUMBER IN AC 
/POSITIVE 

77777 IS FULL SCALE. NOT MINUS 1 
/SAI/E EXPONENT 
/IS EXPONENT ZERO? 


/NON ZERO EXPONENT. SHI FT LEFT UNTIL 
.SHIFT OUT ft ONE, COUNTING SHIFTS 


'SHIFTED THIS MANS' TIMES 
/MAKE IT A COUNTER AND SHIFT 
'MANTISSA SIGHT THAT MANY TIMS 
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4? 4 



EJECT 

475 




476 




477 



•''FORMAT CONSTANTS. Irt F FORMAT- FDIG.FF 

478 

00523 

0083 

3IS.3:3;3;3*.3;3;3:3;3j3;3:3*>3:3 

479 

00524 

8903 


480 

S0525 

0883 


431 

90526 

8303 


482 

0052? 

0803 


483 

80530 

0033 


484 

08531 

0007 


485 

80532 

0063 


486 

89533 

eeez 


487 

00534 

0003 


488 

00535 

8003 


489 

00536 

0003 


490 

00537 

0803 


491 

89540 

0003 


492 

90541 

0062 

FR. 2:2:2 

493 

00542 

8852 


494 

08543 

0092 


49 j 

89544 

8001 

1:2 

496 

60543 

0002 


497 

00546 

0081 

1:2:2 

49e 

0O547 

0002 


499 

30559 

0302 


500 

08551 

8801 

1:1:1 

501 

80552 

0001 


502 

80533 

0081 


503 

06554 

0081 

1:1:1 

504 

80555 

0001 


505 

80556 

0001 


596 




507 




585 








5*0 

3055? 

0000 

SPTCK,0 • 

511 

00500 

7200 

CLA 

512 

5053 ; 

1076 

TAv MSGS •''WRIT LOOF CORING REPORT 

513 

00562 

7648 

224 CLA -TC' OUTPUT I>ATf! 

514 

8^535 

53 10 

JM? , -7 

515 

00534 

3757 

Jr;- r ??TCK 

516 

00355 

4340 

t,TEMT ' LITERS STPSO' ’ 

51" 

00563 

i4i; 


518 

90387 

2405 


519 

00578 

2223 


523 

98571 

40C2 


521 

06572 

2428 


522 

©0573 

2374 


523 

U05 * 4 

7680 
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524 


8600 

*600 


525 





526 





527 



.''INTERRUPT SERVICE FOR TTY KEYBOARD 

528 





528 





530 

00600 

6036 

TT1. 

KRB 

531 

03601 

3186 


DCA INPUT 

532 

00602 

1186 


TAD INPUT 

.5 33 

00603 

1256 


TAD M232 

534 

00634 

7710 


SPA CLP /CONTROL CHARACTER? 

535 

00605 

5212 


JMF CTRL! /YES 

536 

006C6 

1103 


TAD KEVIN 

537 

00537 

7C40 


S 2ft CLP. /PJO SPECIFIED? 

538 

00610 

5503 


JMF I KEVIN /YES 

539 

006 1 1 

5501 


•IMP I XITPT /NO, FORGET IT 

543 





541 

00612 

1186 

CTRL!. 

TAD INPUT '/CTRL CHARACTER. JUMP IND1ECT THROUGH 

542 

G06I3 

8107 


AMO K77 .TAELS BELOW 

543 

00614 

1222 


TAD OFFSET 

544 

00615 

3221 


DCA .44 

545 

33616 

1621 


TAD I .+3 

546 

80617 

3221 


DCA .+2 

547 

00623 

5621 


JMF I .4-1 

548 

00621 

0890 


0 

549 

0Q622 

0623 

OFFSET. 

.4-1 

550 

03623 

1026 


XIT 

551 

89624 

1026 


KIT /CTRL ft 

552 

00625 

1026 


XIT /" B 

553 

38626 

1409 


CALS .CTRL C 

554 

0062? 

1026 


XIT: XIT /D.E 

555 

00630 

1026 



556 

00631 

1609 


FEV3 .'CTRL F 

557 

0G532 

1026 


Y I *T* 

558 

0G533 

1826 


XIT 

559 

00634 

0316 


NEWS 

560 

80535 

1026 


^IT?XlTtXIT:XITTXIT 

561 

00638 

1026 



562 

00637 

1026 



562 

00843 

1026 



564 

00841 

1026 



565 

00642 

1026 


^ IT 

566 

00643 

1026 


MIT 

567 

30644 

1026 


XIT 

568 

00345 

0236 


REPORTS /'REPORT 

56? 

00646 

0200 


rmr ESTOPS ALL ITtffErUSTE 

570 

20647 

1026 


X1T;X!T:XIT 

571 

80350 

1826 



572 

06651 

1026 



573 

08352 

235C 


WA3HS 

574 

90653 

1026 


xmxrrsxiT 

575 

80654 

1026 



576 

80655 

1026 



577 

00656 

7346 

11232.-2 

32 
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578 

579 

580 

sa 1 

582 

583 

584 

585 
536 

587 

588 
5 "9 
590 

0065? 

0800 

EJECT 

✓ROUTINE TO PLACE AH ASCII MESSAGE OH PRINT QUEUE 
✓ENTER WITH A DPR ESS OF MESSAGE IN AC 
✓ZERO LINK. DATA IS PACKED TWO CHAR PER WD 
/NON-ZERO LINK 1 CHAR PER WD 

MESS AG- 0 

591 

00660 

3326 

D Cfi HOLD 


592 

80661 

6082 

I OF 


593 

00662 

7018 

SAB 


594 

*00663 

332! 

DC A LINKMG 


595 

00664 

1875 

T4D tfSGl 


596 

03685 

7848 

SZf-; CL4 

✓FEINTING? 

597 

3G666 

5300 

JMP QUE 

✓YES 

598 

0066-7 

1328 

THD HOLD 

✓NO 

599 

30673 

3075 

DCh MSGl 

✓ADDRESS OF MESSAGE 

688 

00S71 

1321 

TOD LIMKMG 

/PACKED? 

60 1 

08672 

7440 

5Z& 


602 

80673 

7201 

CLA IftC 

✓NO 

603 

00674 

387 7 

DCh fISIPK 


604 

03675 

€846 

TL5 

✓TO GET AN INTERRUPT GOING 

685 

08676 

6301 

ion 


606 

80677 

5657 

JM? I MESSAG 


607 

00780 

1076 

QUE, TOD M3G2 


603 

007OI 

7640 

SZh CLh 


609 

80782 

5313 

J7P LOSTMG 

✓OUE MAS ALREADY FULL 

610 

00783 

1329 

TOD HOLD 

✓QUEUE Ncrr full 

8 : 1 

86704 

3876 

DCh M562 

✓PUT ADDRESS IN M5G2 AND 

6 .2 

00703 

1321 

TAD LIKKMG 


613 

007C6 

7440 

SZA 


614 

00707 

720! 

CLH TOC 


615 

00710 

3 1 GO 

DCh FTS2FK 

✓AND PACKED FLAG IN MSGZPK 

3 18 

00711 

6001 

T OH 


617 

00712 

5657 

I ME33AG 


616 ’ 

007 1 Z 

1322 

LOTTOS, TOD LOS ITT 

/1iO SOON Tv STACK NEW MESSAGE 

619 

087 14 

3076 

DCH 1:272 


820 

007 - 5 

3107 

DCh M32PK 


621 

00716 

600 1 

Mvi 


622 

03717 

5657 

JM? I MLSSAG 


623 

00720 

3000 

HOLD, 0 


624 

80721 

6008 

LINKMG, 8 


625 

00722 

0723 

L03TPT- LObT 


626 

00725 

1417 

LOST, TE>T ZLOST MESSAGE 

'i'.Z 

627 

62S 

629 

630 
831 
632 

06724 

60723 

00726 

0072'" 

807 

007; . 

232*1 

4015 

0523 

2301 

0705 

7674 




imrm 

aovd 
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633 

00732 

0000 


634 




635 



''DATA LABEL POINTERS 

636 




637 




638 

00733 

3342 

NAMES . L 1 ‘ L2 1 L3 

639 

80734 

0771 


640 

00735 

1252 


641 

00736 

1257 


642 

90737 

1264 


643 

00740 

1271 • 


644 

00741 

1276 


645 

00742 

1333 


646 

00743 

1310 

Li0:Lli;L12 

647 

00744 

1315 


648 

00745 

1322 


649 

00746 

1327 

L13$LI4;L15 

650 

06747 

1334 


651 

9075G 

2767 


652 

08751 

1662 

CALMSG.TEXT ' N2 CAL IBRATION< >' 

653 

90752 

4003 


654 

e0753 

'0114 


655 

e87S4 

1 162 


656 

00755 

220! 


657 

00756 

241 1 


653 

00757 

1716 


659 

08768 

7476 


660 

86761 

0008 


661 


0768 

9 = . -2 

662 

30762 

1605 

NEMMS^ T EXT 'NEW SUBJECTO' 

663 

00763 

2748 


664 

08764 

2325 


665 

00765 

0212 


666 

00766 

0503 


667 

00767 

2474 


668 

88770 

7600 


669 

887? 1 

1662 

L2,TSXT ’N2 DELTA' 

678 

007"' 2 

4884 


671 

06773 

3514 


672 

00774 

240 ; 


673 

88775 

0090 
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674 



EJECT 



675 


1000 


*1088 


676 

81000 

3241 

SEEVIC, 

DCft AC VSPtlTE AC 

677 

01031 

7018 


RAR 


678 

01092 

3240 


DOR LINK 

/SAVE UMK 

673 

01033 

7501 


tfQP: 


688 

01004 

3237 


DC ft MQ 


631 

01005 

1980 


thd e 

/SAVE PC 

682 

01098 

3236 


BCA PC 


683 

01097 

6533 


6533 

/AD? 

6B4 

01910 

7410 


SKP 

/HO 

635 

0*011 

551 I 


JM? I ADA 10 

/SEE WHY THE RECEIVERS SHOULD BE 

686 

01312 

6175 


6135 

/CLOCK? 

637 

01013 

7419 


SKP 

/HO 

638 

01814 

5226 


JMF XI T 

/! DONT USE IT 

683 

01015 

6143 


6143 

/PS INTER? 

698 

01016 

7410 


SKP 


691 

0191" 

5226 


Jrrp XIT 

/PONT USE IT EITHER 

692 

01020 

6041 


TSF 

/rro? 

633 

01021 

7410 


SKP 

/HO 

634 

01022 

5242 


■IMP TTO 

/YES INDEED 

695 

0 * 827 

6031 


KS f 

•''KEY- IN? 

636 

01024 

7410 


SnP 

/LIES- HO INTERRUPT 

697 

01025 

5777" 


JMP TTI 

/KEYBOARD 

63S 

01325 

730O 

XIT.CLPi 

CLL 


693 

8132" 

1227 


TAO p*} 

/RESTORE 

700 

91830 

7421 


MOL 

/PUT IT THERE 

70 i 

0103! 

1240 


TAD LINK 

-'THIS TOO 

702 

91032 

7004 


PAL 


703 

01033 

1241 


TPD AC 


784 

0 1934 

6081 


ION 


70S 

8 1035 

5636 


JMP i rc 

CONTINUE 

706 

9133-3 

8380 

PC, 3 



707 

9 1Q55 

0000 

MQ,0 



708 

010 1C 

8000 

L IK*, 6 



733 

0104! 

8008 

4 C,3 


/STORAGE 

710 

711 






712 



SHCTZ ONLY OHS LEVEL. 

ONLY SERVICE C*N TURN INTERRUPTS ! 

713 



/KEEP H 

ROOT! NS VERY 

SHORT 
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” c 



res 


EJECT 


31042 

6042 

TTO, TCF 



01043 

7280 

CLh 



01044 

107 T 

ThP 

rra ipk 


910 45 

T 640 

SZh 

CLP 

- FfiCKIP DflT.H? 

01043 

5313 

JMP 

NOTPCK 

,'NO 

010-7 

r T r ~~ 

L -J tj 

TAD 

FIE 5 T 

xFEINTING LEFT HALF? 

0 IOG’ 1 

77 -i 0 

224 

2 LA CLL 


01051 

5368 

JMP 

RIGHT 

sV.Q 

81052 

1475 

tcd 

I ; 4 :-:Gl 

^GET t !OED 

01853 

7012 

PTE 

; RTF; ; fc.TR 

✓PUT CHARhCTE? IN EIGHT HALF 

81854 

7012 




01 055 

7012 




01056 

2343 

15 Z 

32 y r^T 

. r-’E’.T CtlE TO SB RI6KT HPLF 

01857 

5267 

u* « - 

DECODE 


0 1 000 

3347 

P I GHT - DC A 7 

IR 3 T 


01 T 31 

, ..--ref 

j. -*t _ 

Y A m 

; ?, ! 3 G 1 


0 ic-;2 

2875 

I A 7 

1 1 


0 1 > ;s 

0107 

DECODE - H 77 

' T r-T 


31044 

7x150 

i\ A 



01005 . 

5320 

t 


✓7530 CM«wac * sn'.*s end of piessr^z 

0106 b 

3 z> 5 U 

DOS 

OH HOLD 

-■ SVF 7 

0:057 

1250 

Th r ■ 

•"HHCLI/ 


01070 

1351 

TAD 

474 

7 

81071 

7650 

SNA 

CLP 


010-2 

5311 

JM? 

55 T 43 N 

. CODE FOE CP. 

0 1 077 

133-0 

TAD 

Cl in ‘'Ll) 


01074 

1350 

TAD 

iro 

V -> 

01075 

7650 

SNA 

CLh 


01076 

5332 

Jf- 1 ? 

LF 

✓'LINE FEED 

0 !-07 7 

1350 

TAD 

CHHOLD 


Oi:O0 

1344 

Thd 

M 37 


81 ! 71 

7450 

SNA 

xRETUBH 

TS CODE 37 

0 1 ■ 72 

57 I I 

Tt O 


VE 5 IT 13 

0 i 1 77 

75 1 0 

57 h 



’! 1 * .1 

: 3. jo. 

r.: y _ 

| ; T ^ 


•"1 5 " "'H 

1 74 ; 

'74 \ 

• 257 


0 l : 

604 3 

T* — ^T-T 

i 1 . ^ r * ’ 



► j L i • ' . 
01 : ;0 

550 ] 


r vfTDT 


n 1 1 » 

1 7 I-- 

4 _■ -H 


2 : 7 " ** 


- * - : 

c — <r; 

1 : >r 

4 . — 


i *i : ■ ~ 

: 0^4 

NOT? :: 4 7 : x 

: ' - r 4 1 

; ,jj^ . 71 ^ 

Hi ; * ... 

70.50 




6: 17: 

fi ; ” ‘ lZ 
_* «. - . • 

cr" 7 

:7 

74? 0 

♦ ') j 8 

. LAST CHA 7 PC 

8 1 \ 21 

PT 

7 

TH 2 5 -'r_4 


* :* — ✓ ] ; . 

01102 
0 1 : 77 

L0'6 

"040 

5 _ H 

: v'.^ 

••^•OTHEF MESSR'HE IH OUE? 

1 1 Kl 

57 r- 4 

T'T' 

4 if:: ist 


tii ■ r 

0 I 1 7: 

4" - " 

", X r ; 

f 1 ; 7 4 


0 1 1x7 


- J; 

' ' - :??; 




'PULMONARY FUNCTION TEST 


PflLS-l'SB 


1 \/Z\/74 PAGE 4-5 


769 

G 1 130 

3109 

DCA 

MS2PK 

770 

771 

« 1 fc. 

91 13 1 

5501 

JMF 

I XITPT 

773 

fi 132 

1353 

LF- TAI» H313 


77 4 

G 1 133 

5396 

Jn? 

TYPE 

775 

01134 

1076 

HEW*Sl,7ftD F1SG2 

776 

0U35 

3075 

X-CA 

MSG 1 

777 

01136 

3076 

DC2 

MSGS 

773 

01137 

1 IPO 

TOv 

MSSPK 

779 

01146 

3977 

1*46 

MSIPK 

739 





781 

012 41 

310O 

Den 

MS2FK 

732 

9H42 

5242 

■JNF 

TTO 

733 





734 





735 





736 





737 

’ 0.1143 

0900 

FIS5T,3 


700 

I 

0! -44 

774 1 

HS7- “37 


78 9 

01145 

9237 

4237 , 237 


796 

01146 

9100 

K 189, 130 


791 

61147 

3215 

K2I5- 2 . ■ 


792 

01150 

0003 

CHHOL'J , ;j 


793 

0115; 

7704 

^74, -74 


794 

31132 

7702 

M76.-79 


795 

91153 

0212 

K212. 212 




-''PULI'iONflKY FUNCTION TEST 


PRL8-V9B IU21S74 FfiGE <S-S 


736 



EJECT 

797 

01154 

0565 

UNIT, L;PiL 

793 

01155 

1172 


792 

01156 

0565 


SLb 

01157 

07ca 

L 

381 

0116O 

0565 


302 

01131 

0565 

l:L;L 

383 

01162 

0565 


804 

0 1 163 

0505 


805 

01164 

1172 

?;F;F 

see 

01165 

1172 


807 

01106 

1366 


808 

31167 

1366 

F:F ;? 

883 

01170 

1172 


810 

01171 

1172 


311 




812 




313 




314 




315 

01 !7? 

' 4940 

P, ' TE^TT' 

313 

a 1 172 

4574 


817 

01174 

7000 


318 

01177 

0600 


319 


1200 

*1200 

320 




321 




322 



/DATA BUFFER 

■323 




S24 




325 




82b 

01200 

0000 

?.V, O;9;0 

827 

9120! 

0000 


328 

01232 

0083 


329 

0120T 

0090 

N2DELT- 3:0;n 

830 

0 5204 

0000 


831 

01295 

0000 


232 

31226 

9000 

CV, 0;GtO 

S33 

9:207 

0800 


324 

012! 3 

0000 


335 

0 17 • 1 

11000 

VA23V, £Y3;0 

33b 

0 1 2 1 2 

0000 


337 

91213 

OS00 


333 

01214 

0909 

VC, 3 TO '0 

339 

01215 

0000 


340 

312.6 

0000 


841 

01717 

0090 

TLC>Ot0:O 

842 

01223 

G9AR 


343 

01231 

0000 


344 

0 1 222 

OGOO 

FEf/T 

345 

01225 

0000 


348 

91224 

9800 


347 

01Z25 

0000 

F2V1, 9; 0:0 

c» 48 

01226 

0800 


849 

01827 

3080 


353 

01830 

nooe 

F 1 2FEV, C;O:0 


*•/ •>* 

/+ >. r 


RESIDUAL VOL 
✓DELTA 2 H2 750- 1250 
/CLOSING VOLUME 
/VP «-EV 

^VITAL CAPACITY 
✓TOTAL LUNG CAPACITY 
/FORCED VITAL CAPACITY 
/FEV AT 1 SEC 
/FZVl/FVC 



'PUU'JOHP.EY FUNCTION TEST 


851 

01231 

0003 

852 

01252 

>3330 

353 

01223 

3003 

354 

01234 

3660 

855 

01235 

0809 

856 

01236 

3003 

857 

01237 

6060 

358 

01240 

00QC 

858 

01241 

G06C 

866 

01242 

0000 

36 1 

01243 

3008 

362 

0 1 2-4J. 

00 0 0 

363 

G 1245 

0080 

364 

01246 

8000 

685 

G1247 

0006 

3'z>6 

0 1 25C 

0080 

. ■-= 

C-Oi 

3 1 25 1 

0800 


01232 

8326 

369 

G 1 353 

4,6*40 

373 

01254 

•4349 

371 

Gl-55 

4848 

372 

0 1856 

4833 

373 

S1257 

2681 

874 

0 1 26G 

5722 

375 

0 1 26 i 

2£4* 7 i 

376 

01262 

4043 

377 

31263 

4800 

S78 

01264 

2603 

379 

01205 

4048 

S30 

O 1266 

-:i46 

331 

01267 

4048 

832 

01270 

40GQ 

333 

012" ! 

2414 

454 

61272 

0340 

835 

0 \ 2~*Z 

4040 

83 6 

9 7:9 

4040 

837 

p. 

~+!J 0 U 

coo 

+*j *_j 

C I2"‘" 

ry ■nr 

839 

8!I" T 

0340 

S3 6 

u ■ V0 

40 

H*h j 

d 1141 

4c :<-t0 

392 

! "* J 

^ i :• , •' 

47’ 00 

333 

■\ : ";1T 

0785 

894 

r . * 1 Z/ v 4 

c £ :‘r i 

395 

f* t - '*c- 

4040 

896 

0 1 30 4 

*4040 

S3 7 

0 1 707 

4008 

393 


8605 

893 

01311 

266 * 

306 

01312 

5786 

90 1 

G1313 

2683 

302 

pt-i * 
V 4 i *r 

4b 00 

963 

01315 

8626 

904 

01216 

U i 7*; (' 

905 

U1317 

2603 


FVOZ vr. e ; Q : 3 
MEFS, 0:0-0 
MVFS, 3-9 :>3 
Ct-Z'/0, 0-3:0 
CC2TLC .3:0:8 
L3»TEXT ' :r 

LA, TE/CT ' VA W 

L6, TEXT 'VC 

L7, TEXT ’ TLC 



L ii , text j fvc-vc 


PAI.S-V93 1 1/21/74 PAGE 4-F 


/Fvcc.n-'c 

X23P-700 3TPS L/SEC 
X.25-.75 BTPS L'SEC 

.'H 



/"PULPlONflPV FUNCTION TEST 


PflL8-V9B U.^21^4 PAGE 4-8 


$06 01320 4040 

90? 01321 4000 

908 01322 1503 L 12, TEXT 

909 01323 0622 

910 81324 4040 

911 81325 4846 

912 01326 4388 

913 0132? 1515 L 13, TEXT 

314 01330 0622 

915 01331 4040 

316 01332 4040 

91? 01333 40SG 

913 o 1334 G326 L 14. TEXT 

913 01335 572? 

920 01336 0340 

921 01337 4048 

922 Q1343 •'*800 


' MEFR 


' r MFS 


' CIVVC 





/FULflONGSY FUNCTION TEST 


PRLS— 1/3B 11/21/74 PAGE 4-5 


923 EJECT 

924 


925 



/COMPUTATION OF DEFINED 

VARIABLES 

926 



/CALLED BV 3EF0BT 


927 





928 





929 

0134t 

mm 

AUX, 0 


530 

01342 

4407 

FEtrrsa 


931 

01343 

5225 

FGET FEV1 

/F12FEI/*FEV1*108/FE1/ 

932 

01344 

4222 

FDI17 FEVT 


933 

i -7 >*C 

1 - 

3173 

FMUL 3100 


934 

' 1346 

6238 

F?UT F12FEV 


935 . 

J 1347 

5222 

FAST FFVT 


936 

01258 

4214 

FDIV VC 

/FVC2VC * \ 00*FE17/S/C 

937. 

01351 

3173 

FMUL F180 


538 

91352 

G233 

FFUT FIX3PC 


939 

01353. 

5203 

F'rET Iv 1 


540 

01354 

4214 

39 1'.* U‘C 


941 

01353 

317" 

— J\*J P TTJQft 

/CL *2 VC* i08^CV//C 

942 

01356 

6244 

r + _ * ' ^ v ii^L 


943 

01257 

5206 

U ■ J_ ■" T ■-■ ! # 

*'2.1 V 


944 

01350 

1200 

Fft ! D El ■ 

/CC2TLC = 1 08* CRV+C V) /TLi 

545 

01361 

4217 

FlT V tlc 


946 

01362 

3173 

Fi v ?J w F 130 


'?47 

01363 

6247 

3 PUT CC2TLC 


94q 

0 136 4 

0B00 

?exit~ w 


945 

01333 

5741 

JM? I 9.U X 


958 





951 

01366 

4840 

F ^ TEXT ' BTPS LITERS/SECC > ' 

952 

01337 

0224 



952 

01373 

2G23 



954 

81371 

4314 



955 

01372 

1124 



556 

01373 

8522 



557 

01374 

235" 



958 

01375 

7335 



959 

81376 

03~4 



960 

01277 

7600 





/'PULMONARY FUNCTION TEST 


PftLS-YSB 1 1/2JL/74 PAGE S 


961 

362 

363 

964 

965 

966 

367 

368 
36^ 
97f1 
37 t 
A72 
a l 

31408 

1400 

7306 

*1408 

/SOUTANE TO CALIBRATE MASS SPECTHOMETER NITROGEN 
/CHANNEL. THE MASS SPEC USED WITH THIS PROGRAM 
/HAS A WAR TABLE ION CURRENT. SO IT WAS EASIER TO 

✓CHANGE IT THAH THE CONVERSION FACTOR* FOR SOME TOSS SPECTROIETEBS 
-Tt3 ROUTINE SHOULD CHANGE THE CONVERSION FACTOR- H2PR19- 

CAL5,CLfi CLL 

U?4 

01401 

1371 

TAD OPLMPT 


375 

: « x402 

4512 

OUTPUT 


976 

0140'J 

7240 

OLA CTO 


977 

0145a 

3 A 16 

AND K7774. 


97b 

3 1 ao5 

6865 


/SEND FULL SCALE WOLTAGES TO XY PLOTTER 

*- 

9 1 486 

7001 

? A 
* ^ ^ 

'CHANNELS 


"UtJ? 

6665 



* 

^4ie 

7200 

OLA 


• ■ j 

3141 1 

i 7^<3 

_ Cr ilJ 

TAD CPLXT? 


98 ^ 

01412 

3103 

DC A KEVIN 

''SET TTI A 10 SECEIl'EE 

984 

01413 

1321 

TAD CALN2 


985 

01414 

31 1 1 

TCP PDA 10 

-/SET AD A 10 FZCEIWES 

936 

01415 

1 1 13 

TAD N23AM 

/INITIATE A SAMPLE 

337 

01416 

6537 

.SAMPLE 


338 

0 U 1 ? 

7203 

CLh 


989 

01420 

1113 

TAD N 2 SAM 


990 

01421 

6537 

SAK?L£ 


991 

81422 

7200 

CLA 


~>92 

01423 

3313 

DCO FLAG CL 

/CLEAR SAMPLE FLAG 

995 

0142a 

6001 

I *-4 1 


994 

01-25 

7200 

RPT, CLA 

/WAIT LOOP 

995 

0 1 426 

1313 

TAP FLAGCL 

/ME!I SAMPLE? FLAG SET BY INTERRUPT SERVICE 

996 

01427 

7653 

31 ?H CLA 


997 

0143Q 

5225 

4 _T 

/NO WAIT 

993 

01431 

13 

DC4 FLflGCL 

/YES P per ESS 

999 

01432 

1 322 

Tr'C 1 I' “HOLD 

.-'637 SAMPLE 

1000 

01433 

4465 

UNPACK 


1001 

01434 

4407 

FE: iTE7 


1002 

01435 

3124 

FWL N2P7T3 

'CCW^FFT TO F PACT! CM 

1003 


62 i5 

"FUT ^N2CL 

■'AMD 

1304 

01 457 

0003 

F 2 ;-:£T 


1305 

0144U 

4576 

Dr'CHS 

-'SUBROUTINE TO SEND .TO D VW 

1036 

G1441 

7203 

■I LA 

1007 

91442 

1314 

TAD TVPFLG 


1008 

r* : t 

7650 

SMA CLA 

TONY KEVINS? 

1009 

0 1 a 44 

5225 

JM? RPT 


1019 

0 1445 

3314 

a* A TVPFLG 

/YES A P KEVIN 

1011 

81446 

4407 

FENTER 


1012 

0 1 447 

5315 

FOET FN2CL 


1013 

01-50 

9000 

fe:cit 


1014 

914"! 

7737 

CLA CLL I PC 

OCL PTL 

1335 

91452 

74^1 

l*’A 

/SEND FORMAT 



/PULMONARY FUNCTION TT5T 


PALB-D'SB 11/21/74 PAGE 5-1 


1016 . 01453 7307 CLA CLL IAC RTL 


1017 

01454 

7120 

CLL OIL 

1018 

01455 

4466 

POUT 

1018 

01456 

5225 

JMF EFT 

1020 




1021 




1022 




1023 




1024 

01457 

7260 HEUN2, 

CL A 

1025 

01460 

6537 

SAMPLE 

1026 

01431 

7421 

mi 

1337 

81432 

1113 

TAD N2SAM 

1028 

0 1 463 

1114 

TAD DELAY 

1028 

0 1 464 

6537 

SAMPLE 

1030 

8 1465 

4515 

c - jyvr 

1631 

01466 

3322 

DC A NHOLD 

1032 

O 1467 

700 1 

I h‘ _- 

10 j3 

0 1.470 

3313 

DC A r LGCL 

1834 

0 I 47 1 

5301 

J?1? I XIT3 


1635 

1036 

1037 


1038 

01472 

72C0 

CALX IT. 

CL A 

I038 

014^3 

1 106 


TAD INPUT 

1040 

01474 

l!2Q 


TAD MINUSS 

1841 

01475 

7649 


SZh cla 

1842 

01476 

5303 


JMF NOS TOP 

1043 

81477 

3133 


DC A KEVIN 

1044 

0 1 300 

1134 


TAD AD LOOP 

1045 

01501 

3111 


DC A ADA 10 

1046 

01302 

3470 



1047 





1043 





1049 





1050 

01303 

7208 

N0370P. 

CL A 

185 1 

01304 

t T 06 


INPUT 

1 1 
i 

0 1383 

'.320 


783 MINUS? 

1053 


7 4-0 



1054 

3 1507 

5301 


JM? iVlTPT 

r 055 

01510 

788 i 


T .'•■ , _ 

i _• 

i 0-56 

0 : 5 1 T 

3314 


DC A T^FLG 

1 837 

015 :L 

530 1 


", ■_: T 

1038 



" LCC L r 


1 05 3 

015 ’ Z 

0003 

7 r ft*pr r 

1} 

1Q60 

Pi [ S ;4 

0000 

T7?FL‘j. 

0 

1051 

81315 

8868 

FH2CL.0 

* o « V ; 

* - 

1862 

015*6 

008t» 



1063 

01517 

305C 



I064 

8 1 588 

7468 

MINUS?. 

-320 

ic-oS 

01321 

4 V ■ 

CALN2-NEXA5 

1066 

0 1535 

0060 

NHOLD ■ S 


1007 

np-27 

1472 

CPLXT? ■ 

CALX IT 


1663 

1069 

1076 


/PRINT FRACTION 


/INTERRUPT SERVICE FOP AD IN CAL 

/START NEW SAMPLE IN 40 MSEC 
GET LAST DATUM AND PACK INTO ONE UD 

/sr;i/E IT 

/SET NEW SAMPLE FLAG 
/EXIT FROM INTERRUPT 3EEk' 7 CE 

/m A 10 REC Elt-ER 
/WPS P’ AN 3 
/NO 

ATS EXIT FROM CAL 


/WAS IT A ?" 

/NO 

/YES SET PRINT FLAG 






PULMONARY FUNCTION TEST 


PAL8-I/9B 11 ✓2IXT4 PRSE 5-2 


1071 

1072 

01524 

0900 

DACN, 9 

1073 

0152:3 

4407 

FEHT5H 

1074 

31526 

3137 

rMUL F2947 

1075 

0152" 

0«03 

trtr*- ** *r 

* v - • - _ 

1075 

01553 

4472 

F l?" 

1077 

0153T 

7004 

2HL 

1073 

01552 

011€ 

HMD K7774 

1079 

01523 

1 133 

TRD DV'Ti 

1080 

01534 

60*55 

DhC 

1031 

01533 

5724 

Jr T ? i DACN 


"MULTIPLY N2 FRACTION BY 2847 


✓MAKE IT A "SIGNED I? BIT NUMBER 
✓NOT ON UNSIGNED NUMBER 
✓MASK 

✓ADD DAM CHANNEL 
✓SEND TO Dtft 



/PULMONARY FUNCTION 

TEST 


PRL8-X9B 11/21/74 PBG£ 5^3 

1082 



EJECT 



1033 






1884 






1035 



/ROUTINE TO CONVERT 

FLOATING NUtlBEP.S TO SIGNED 12 BIT INTEEFS 

1086 






im? 






1038 

01536 

0000 

F I XX, 0 



iea~i 

01537 

7280 


CLG 


1090 

81548 

1044 


TAi' 44 

/GET EXPONENT 

1091 

015^1 

7548 


SZh SMS 

/EXPONENT . GT. 8 

1992 

a 15^2 

5343 


JM? .+3 


1093 

01343 

7239 


CL 4 

/NUMBER ^:SS THAN I CABS l/ALUE) EXIT 

1034 

0154-1 

.j 3 J - 4 


JMF D+l 

/WITH ZERO IN AC 

1095 

01545 

137C 


TAD M13 

/EXPONENT .ST. A CCWPflBE TO 13 

!096 

0 1946 

7450 


SNA 


1007 

01547 

5363 


JM? D 

/EQUAL TO 13 45 CONTAINS ANSWER 

1333 

Or-5 9 

7508 


Si 14 


109^ 

0155! 

5365 


jxr EFF 

/WM3EP TOO BIG FOR 12 BITS 

! 100 

8 1352 

3344 


DCP 44 

/HOW i' , ANY TIMES TO SHIFT EIGHT 

! 101 

0I553 

7108 

GS, 

CLL 


1133 

01554 

1345 


TAD 45 

/GET mS 

1103 

8 1555 

7510 


- c* 

w x H 


1 104 

01536 

7320 


Cf-T 

/PRESERVE SIGH 

1105 

81557 

7018 


EPS 

/SHIFT 

1106 

01560 

3G45 


DCh 45 


11Q7 

01361 

2044 


1SZ 44 

/THROUGH? 

1108 

01562 

5353 


■IV'? GG 

yr'Wij 

! 139 

01563 

1045 

D, 

T4T> 45 

/YES GET NUMBER 

1110 

31564 

573 4 


JTJ? I FT XX 

/EXIT 

11 1 1 

91565 

7340 

ERE, 

Cl H OLL CMA 

/NOT FIXABLE 

1112 

01566 

5736 


JMF I FI XX 


1113 

01567 

5363 


JM? D 


1114 

01570 

7765 

Ml 1. -1? 



1 1 15 

0 157 1 

075 i 

CGLMP7, 

f -A Li Td j 


1116 






1 1 17 






1 1 13 






U 13 



'5ER^I 

CE ROUT! HE FOE 40 WHILE NO ONE 03 E 5 AD 

1 120 



■'TO KEEP ff POM LOSING 

SYHC 

i 121 

015"? 

7 

LOOPED . 

CLP 


1122 

01373 

333? 


sh:tle 


1 123 

81574 

"200 


L>‘ 


U£4 

01575 

1161 


TAi* DtJMPD 


1125 

01576 

6537 


SAMPLE 


1 126 

£ 1577 

550 [ 


J.’L? I XITPT 




✓PULMONARY FUNCTION TEST 


PALB-t'ErB li/2 1^74 PASH 8 


1127 
1123 
1 123 

1130 

1131 

1132 

1 133 

1 134 

1 135 
1 136 
1 137 
1 138 
1 138 
1148 
1 141 
1 1 42 
1 143 
1 144 
1 145 
I 146 

31680 

1600 

73«A 

*1609 

✓fem routine, consisting of three parts 

1. WA IT LOOFHIONITORS SAILED BATA BUFFER 

AND UPDATES DLTi WITH LATEST LOLUME* 

/ AT END OF BREATH, INITIATES COMPUTATION ROUTINE, 

2. A/D INTERRUPT 3EPMI CE-RECE IMES AND STORES SAMPLED 

/ DATA, INITIATES SAMPLES > AND CONTROLS 

SPIROMETER WIVES. 

7 3 . ChLCULATIQNS-COI'IFUTES FEM PARAMETERS 

PEL'S ^ CLA CLL 

1 147 

01601 

1253 

l >*i l-‘ r — i 


1 143 

91632 

4512 

OUTPUT 


1148 

91633 

£537 

SAMPLE 

✓INITIATE 1YOLUME SAMPLE 

1153 

01584 

7238 

C LA 


1 151 

016U5 

1132 

Ts-r- :-‘OLU7fH 


1152 

3 16EG 

6537 

SAMPLE 


1 153 

O1607 

7288 

CLA 


1 154 

81610 

1252 

TAD I7ADA \ 0 


1155 

91611 

311 1 

DC A ADA TO 

✓SET A IO RECEIVERS 

1156 

01512 

1251 

TAD MKEYIN 


1 157 

81613 

3163 

DC A KEYiN 


1 158 

01614 

3233 

DC A MEOE 


1 158 

31615 

3157 

DC A 4*5 KEY 

/CLEAR rLr»63 

1 160 

016} c 

3154 

DC A YHKEY 


1161 

9 1 3 1 7 

ire 

TAD OPEN 


1 162 

n i i-~20 

6075 


'OPEN MALMS UNTIL FIRST SAMPLE COWLETE 

1 163 

n 1521 

7127 

i-C A v*7Li 'E 


1 164 

Q1022 

- ’7S6 

FIRST. lEURR 


1 1 55 

01623 

72 GO 

FLp-’fri I 1 * .-un 


1 155 

-j 1624 

* 157 

TV' !'Ck *?«. * 

E — . J « i i_. 


1 167 

3 1G25 

76 -C 

szh ;lh 


1 158 

0 1 7 C 0 

5254 

jpp fle::it 


1 168 

01152" 

1247 

Trti) MJSE 

/NEW SAMPLT? NOT IF VU3E-MIN 

1 170 

01630 

7041 

CiH 


1171 

31631 

1246 

iAD MIN 


1172 

01632 

7548 

SMA SEA 


1 173 

o 

5267 

f ,‘f T t - 

✓YES. 60 DISPLAY IT 

1171 

0 

7200 

C t-r 


1 175 

0!6 -Z 

! 259 

Tr- V I 7 -vB 

✓END OF BREATH? 

1175 

91020 

7658 

SNA CLA 


1 177 

916 i"* 

t' T 7? T7 
— wi- 

JM? mfHT 

/HO. 60 WAIT SOME MOPE 

1 IT? 

G!0^c 

3259 

DCh YE03 


1 17? 

01541 

1 134 

ADI OOP 

✓YES CLEAR AD A 10 RECEIVER 

1 130 

91642 

"HI 

DCS ADA I 7 


1 121 

31647 


T ~ J i 
i ■ 





PA L8-</9B 1 i/21/74 PAGE 6-1 

/GO COMPUTE DATA. 

/USED 3Y ITIT. SERVICE TO STORE WTO 
/USED BV WAIT LXP TO DISPLAY DATA 


/RESET DATA STORAGE POINTERS 


♦'GET SAMPLED DATA 
-SCALE IT TO LiTERS 

/ID LITE'S -PULL SCALE 
✓ FULL SCALE *2347 COUNTS 

L'r^iTS 12 T! T PFOSITIVE NUMBER 


r SE f ' ,r * 




PALS-P'BB 11/21/74 PAGE 6-2 


/ INTERRUPT SERVICE FOB AD DURING FEV 
^ET LAST P'ALUZ AND INITIATE NEW SAMPLE 

/CALL ?P I FOMETEB SUBROUTINE 
/FEN NOT STARTED 
/END OF BREATr! 

/STORE NEW DATA POINT 

/SET END OF BREATH FLAG 

/'TNCFET’FNT STORAGE POINTER AND 
• •''SAl-T L.-iTA 


/CON WEFT LITERS TO 3 TPS LITERS 


/CONCERT !2 3 IT PCS HIP'S SAMPLE TO 
/FLOATING POINT LITERS 

. 'MAKS FLOATING POINT FRACTION OF FULL SCALE 
/!-L’L SV VOLUME AT FULL SCALE 

/I .336 



/PULMONARY FUNCTION TEST 


1286 


1237 


1238 

01756 

1239 

31757 

1290 

01769 

1291 

01761 

129? 

017C? 

1293 

01763 

129 ^ 

01764 

12:o 

01 "65 

1296 

01766 

1297 

0 176? 

129S 

81770 

1295 

01771 


0000 clsum, 0 

1367 

3010 

1370 

7371 

7410 

2371 

5367 

5756 

0017 NP,N-l 
7701 NC, -17 
0000 NC 1 . 0 


TOD HP 
DCrt IS 
TOD NC 
DC* NCI 
DON I 18 
IS2 NCI 
JM? .-2 
Jf^P I CLSUM 


PAL8-I/3B 11/21/74 

/ROUTINE TO CLEAR 
/PUT HERE BECAUSE 


PAGE 6-3 

LEAST SQUARES SUMS 
NO ROOM RT ROUT 




''PULnOHREY FUNCTION iEST PftLs?-V9B 11/2U74 Pft££ 

J300 01 777 2CO0 

1301 2000 *2000 

1302 

•303 

■ 'COMPUTATION SUBROUTINE TO? f=l-' 

A JUJ 

130*3 
1307 
1 3QS 


1300 

3200U 

0000 

1310 

32201 

4777 

1311 

02333 

"7 -7^" 

1312 


1*2-5 ! 

1313 

" 

4532 

1314 

3 j 3 

243 1 

1315 

u£ 0 GS 

-i407 

m 3 

022323 

^33 ‘ T “ 

mr 

- L J 

?000 

i .. 1 j 

", ”0 1 1 

1 1 * 7 ^ 

! ' i S 

_;+*!;, ■ 


1 330 

:J 2 H 13 

320 1 

1 T Z I 

22 ' i- 

1*5=5 l 

ir?r 

fton - t 

■iC7r 

t r ?23 

J 2 0 i 3 

4431 

1324 

02 ?:" 

4403 

17E? 

0221IZ5J 

"2Z35 ’ 

13 ‘S 

> r" 7 *■ ; 

3 : 3 : h 

1 327 

Jc -,2 2 

T 7 -' - •* 
-if' 

i _'*i£ 

0.3023 

0 232 

1322 

► 24 

37”: * 

1330 

023: r 

- i-L \ _■ 

1331 

02 ?: - 

- T” ZP 

1332 

T . 

rj- . : _* 

• 22 3 

- : 3: ? 


1334 

i 

E 1 -4. 

4 -j J ^_p 


44. 

1323 

r t*- — 7 

- j'C 

i?3" 

T “ 

3 “ ^ 

1332J 

n 3 0 3 5 > 

4 3 0:4 

1 337 

020 30 

3143 

134n 

02033 

4* r 3 4 * 

1341 

02040 

■ T . T, > - ■ 
-+ _l f 

1342 

02 v >£ 

r i 

i "4^ 

1 "D i 7j 

4T^,' 

A . ’-V : J 

: 1 , - 

*>ij : IK 

r -0 ^ ~~ i 

: -. 

4 3 ■_- — 

I C 

. _ -i : 

?: "i -L - 

: 14?: 

i~-4. ' 

’ 2 j ' ---:• 

-i«i_' ,* 

1 ' ■ ' Tj 

1 z ;* . ■ ■ 

fA 1 

J 7 * ? 

K 3 ■.. ~ 

t*. 

13*50 

- , -^r i^- . 

4“ > X 

1 731 


3*4 -' 

1' 32 

f _ i t - 

4 - * 3 -i 

•■ - --T r 

ri : 

33 L 


j; *s 

DC.? 'POINT 

TrSJ j I'POIM 
~L' r Vr! T 


-• A. _ _» 

r~ -t; 


T-" l-'STAST 
7 - • ■ ► ,'? T 

? i-f ?nviy 

I'l-'oitti 
rvn/OL 
3 ] ?5 

- ~ ’1T^ 


-i r 


Pf-M 

cpT :>t; 

t 37. r 


T ; r 7.:^p 

.IT 

•?“ ST>oCH 


rr .=-7 £;ehf*.*;h 

» Cr* !vl: 


:vn 


' ' .3 T . 


; T-I ‘ 


•'FIND MRK r'OLUlTE IN THIS BREATH 
TA5T DATA POINT ADDRESS 


'HO "TO 


. r^:> f-htj? fcint n>r liters stfs 

Vr^ST 5 H £7 -_j£i 3 T ^CTr 


' r "3 1 ^ OCTAL • 25 i ECIi’IPL SAMPLES •NT'’ - BUFFER 
-’15 ■>'£ SEOT-JI. GET fHAT VOLUME ' ’ “* 

/ 'HNB i-MKS IT 2TF9 LITERS 

/C'p'O’' *7 J T p-Tt »1 


.TfPi'r 1-OLJM2--. =.35 BEt-T, SUP .75 BELT 
• 'F7‘T- THE!? BIB PLACEMENT in ft R FRY 


■'CO' ’PUT FLC4J RATE BE7V3EZN felD 
S FvFE NS MttFS 


' ' 1 ** -T* r~ . - . > i — * -v 

^ * i. - . - .A Oi ~ r - 


• T*'" K ♦=-» . -* 

« ■ 3id l I '«_■ ^ 



/PULnONfiKV FUNCTION TEST 


PALS-V9B U/21/74 


PAGE 7-1 


1355 

02056 

0903 

FEXIT 

135C 

02057 

5600 

JKP 1 1’COhP 

135? 



K31, 

1358 

62069 

033! 

K25. 3 1 

1355 

6736 i 

0080 

1/POIHT,0 

1360 

02862 

3o08 

FQTR.o:8; r i 

1361 

G2u6S 

0098 


1362 

02364 

0003 


1363 

02065 

0060 

F30TR , 8 ; 9 ? S 

1364 

023GG 

0800 


1365 

82067 

3030 


1366 

02979 

7777 

FFT25 , ?77? * 2800.8 

136? 

02071 

2900 


1368 

02372 

0000 


1369 

H2073 

0GO3 

FPT?5,0-?8O8;C 

13?0 

02374 

3000 


1371 

02075 

0080 


*372 

02876 

7776 

FPT2,77?$:3146?3147 

1373 

02077 

3146 


1374 

02:00 

3147 


1375 

921*1 

0001 

F1FT2 , 1 rS3‘,4?63!3 

1376 

02 i *2 

23 14 


1377 

02183 

6313 


1378 




1379 




1380 




1381 

92194 

0630 

SEARCH, 8 /ENTER 4ITH K)t DESIRED IN FLOATING AC 

1332 

92105 

4487 

FSKTES 

1333 

62196 

6347 

FFUT VWANT 

1334 

022O7 

0398 

FEXIT 

1335 

02110 

7231 

CL, 4 !fir 

i336 

02111 

1135 

’"A? V’START 

1337 

321 12 

326 1 

T'CA 17QIHT 

1333 

02113 

3346. 

L’Cfi FI2ST1 

1389 




1390 




1391 

1392 




1393 




1354 



"DCNT CHANGE THIS STUFF WITHOUT LOOKING AT SBANAL 

1335 



/IT USES v-riU 2 OUT I ME ALSO 

1396 




1397 

1393 

£2 1 i * 

72*'* 

E?7E» CIO ✓ INDEX THROUGH POINTS UNTIL FI HD 

1356 

32115 


7.-0 I 1/POrMT s? I35T CT!E GREATER THAN DESIRED t-WJME 

1401] 

02116 

4536 

FLTVOL 

1401 

02117 

4471 

STT J 6 

1432 

02122 

4407 

FEKTE3 

1403 

02171 

2347 

FSUE vumr 

1404 

02122 

0000 

FE>*tT 

1405 

02123 

7200 

ClH 

1436 

02124 

1045 

TAD 45 

1407 

02125 

7700 

Sri'H CL A 

1498 

02126 

5341 

Jf-tf BFGGEF. /FOUND IT 

1439 

G2127 

i L* --*0 

fjv>* 





Ptfia-VSB 11^21/74 PAGE ?-2 


'APE !4E THSCUGH REPAY? 

./HO 

^rE3 f*HD l?._ , ?ND IT 

-'FOOM^ IT 

/GET ITS ADDRESS AND RETURN 


/FLOP! A SIGNED 12 BIT NUMBER 
/PUT IK LOWING AS MSB 
/CLEAR LSB 

/EXPONENT TO PUT RADIX FT BETWEEN MSB,ISE 
/NORMAL ZEE 



^ULMOHARY FUNCTION TEST 


PALS-t/33 11^21 *-74 PAGE 7 - 3 


t-S47 

1448 

i “f-*9 

(450 

1451 

(452 

(453 

(454 

(455 

1456 

(457 

1459 

1459 

02171 

821/2 

32173 

32174 
02175 
0217* 
0517' 

1647 

1236 

1241 

2206 

1225 

1222 

227? 

2263 

EJECT 

*2280 

■'CALCULATES FLOW BETWEEN 

1460 

022S0 

mm 

FLO. e 


1461 

0223! 

7260 


CLH 

(462 

02202 

3044 


-CP 44 

(463 

1464 

02203 

62204 

3045 

3046 


DCR 45 : DCA 46 

1465 

02235 

1142 


TAD 7FH l 

(466 

0220b 

7650 


S HA CLP 

1467 

02207 

56O0 


JMP I FLO 

(468 

02213 

1K3 


TAD WFLO 

(469 

02?! 1 

7459 


S?1h 

(470 

32212 

5609 


JMP I FLO 

(471 

02213 

7041 


CIA 

1472 

02214 

1 142 


3RD OFHL 

(473 

02215 

4474 


FLOAT 

(474 

02216 

4407 


RENTER 

(475 

02217 

3274 


FMUL F PTC 40 

1476 

02220 

6144 


F?1JT FKAC 

(477 

0222 >. 

0003 


FEXIT 

1478 

04222 

1543 


T AP I WFL0 

(479 

02223 

4d3C 


FLTVOL 

(480 

0222^ 

4471 


3T?S 

(481 

02225 

*ui07 


FENTEF 

(432 

02222 

6241 


FF'JT FLTEMP 

(483 

02227 

0030 


FEXIT 

(484 

32230 

7203 


; J f % 

.485 

82231 

1542 


TAD 7 WFHI 

I486 

12232 

4536 


FLJXOL 

(437 

32233 

4471 


i> f 3 

,438 

0223 4 

4407 


FENCES 

.489 

02235 

3241 


F:3U3 FLTErl? 

(490 

0223S 

41 4 j. 


?B[W FKAC 

,491 

02237 

‘J3-0 


F27-T 

.492 

622-W 

5bG(3 


7XF I FLO 

.493 

,494 

495 

02241 

02-242 

022-3 

0000 

9860 

FLTEM?. 

C : 0 ’ 0 


itXUMES POINTED RT BY t-THI,|/FL0 


■GET NUTIBES OF SAMPLES BETWEEN THE TOO 
■*43 MSEC -"SAMPLE 

GET WLUME IN LITERS RTFS FOR WFLO 
AND I/?HI 

/TANE DIFFERENCE AMD 
✓D I WIDE 3V TIME F03 FLOW 




PRLB-i'SB 


1 1/21/74 


PAGE 7-4 


v'FUU<10NRRY FUNCTION TEST 
1496 EJECT 


1497 

02244 

7200 

WEV, CL 9 


1498 

02245 

1136 

TAD 

INPUT 

1499 

02246 

7421 

MOL 


1500 

02247 

750: 

hCS 


1501 

02250 

1128 

TAD 

MINUS5 

1502 

02251 

7G4S 

3ZA 

CLft 

1503 

02252 

5256 

Jilp 

.+4 

1584 

022 53 

7001 

IhC 


1505 

02254 

3 153 

DCA 

YSKEY 

1506 

02255 

5501 

Oil? 

I X1TPT 

1537 

*2256 

7501 

noft 


1598 

4225^ 

1J47 

TAD 

MINUSN 

1509 

02260 

7640 

SZA 

CLft 

1510 

82261 

5265 

JM? 

.+* 

1511 

62262 

7S>:: 

iHC 


1512 

02265 

3154 

DCA 

iTNKEY 

1513 

0225^1 

550 : 

J!1P 

I XI TFT 

1514 

92365 

7501 



iris 

82266 

1777* 

TPD 

il l HUS F 

1516 

□2267 

7640 


CLft 

1517 

02270 

5501 

4 r ip 

I X I TFT 

1518 

02271 

7001 

I AC 


1519 

02272 

3155 

DC A 

17PKEV 

1520 

02273 

5501 

jmp 

I XITPT 

1521 

02274 

7774 

FPT940,?7?4 


1522 

02275 

2436 

24:-<c 

i 

1523 

02276 

5686 

560> 

i 



'PULmOHREY FUNCTION TEST 'PRL8-1^9B i 1 / 21/74 PAGE ?-5 


1524 



EJECT 


IS25 





1526 



ROUTINE TO SCAN WOLUMS SOTiSD DATA AND FIND 7!AX 

152" 





1528 





1529 

02277 

8808 

e 


1538 

02300 

7289 


CLA 

1531 

B2301 

1 135 


TAD WSTAST /SET POINTERS AT START 

1532 

023O2 

3344 


DCA Hi 

1333 

023S3 

3345 


Drift ttl 

1534 

02304 

1135 


iHLi H2ART 

1535 

02335 

334^ 


DCh 

<536 

923 Gw 

1746 


TAD I W 

1537 

92307 

7100 


CLL 

1538 

32310 

7810 


EAR 

1539 

023 1 1 

3345 


Or A Hi 

1540 





1541 





1542 





1343 



'OOoooc^::<o:>c<cco<x:cc>o<xcoc'<x>^^^ 

1544 





1545 





1540 



/DONT C 

HAMGE THIS STUFF WITHOUT AT LEAST CHECKING 

1547 



/VC COJIFLITPiTIOH IN SBANftL 

1548 



/SBANAL 

USES THIS STUFF 

1549 





1550 





1551 

02312 

2344 

NEWW, 

133 Hi /GET NE;<T 

1550 

92313 

7200 


CLh 

1553 

82314 

1344 


TAD FU 

1554 

023:5 

7041 


IH 

1555 

0231*3 

1?7€7 


TAD ‘USE 

1556 

82317 

7750 


SPA S4H CLA - /HAWE WE LOOKED AT THEN ALL 

1557 

023 2 Ci 

3337 


JNP L17MX ATS 

1558 

0232 1 

1744 


7a:> t hj /no get nest 

1559 

02372 

7100 


CLL 

1560 

02723 

7010 


EAR ' /SCALE EIGHT FOE SIGHED ARITHMETIC 

1561 

92334 

_ _■ ’-*< 


DC:'; y$v 'SPy v £ IT 

1562 

92325 

134? 


Th7 7SI/ 

1563 

02^22 

7041 


;ih 

1564 

0272^ 



T7T ON yCCv TSRE IT TO OLD MAN 

1565 

02333 

77; V: 


' 7 * : ■* lLh 

1566 

0233 : 

53 12 


jr:? ::euv "less than 

1567 

82332 

1347 


TAD WSW ."GREATER THAN 

1566 

*J3 ;3^ 

3345 


dc a m 

1569 

0277 - 

i 7 - - • 


TAD I2U /STORE NUMBER AMD POINTER AS HEW MAX 

1570 

823 

;■ i* 4i j 


“ r ,4 t -f tp 

1571 

02375 

5312 


■IMP ueww 

1572 

02 33 ? 

"200 

UK a : 

p -, 

1573 

02346 

1346 


TAD IMP 

1574 

82341 

or i b 


DCh ! 'USE 

1575 

02742 

1346 


TAD ' TIP 

1576 

027-13 

5077 


JE-T I 

1577 

0224a 

0008 

I/J . 0 


1578 

82343 

0 u 8 u 

wm, e 




FSL3-V3B 


11 ^ 21^74 


P0SE 7-6 


TFUU'JOMrtRY FUNCTION TEST 

1579 
158Q 


02346 0060 

02347 0000 


fc'rip.a 

l/Sl'. 0 



/PULMONARY FUNCTION TEST 


PAL8-V9B U/'21/74 PAGE 8 


1531 /STAR? OF WP^CUT SOUTINE CALLED BY CTRL-W 

15tf2 /SUBPROGRAMS 

1383 .'1. INTERRUPT SERVICE-SAMPLES 02, N2 PAIRS, STICKS DATA AWRY 

1384 / ALSO OH SECOND BREATH (FIRST AFTER INHALING 02, ST.. 2S ALL DATA PAIRS 

1583 /2. IDLE LOOP-fiS SAMPLES COME IN, SEEPS TRACK OF MAX N2 FRACTION FOR 

1336 / CURRENT BREATH, DISPLAYS IT ON ’441, ACCUMULATES TOTAL NITROGEN EXHALED. 

1387 /3. SBANAL-ANALYZES SB WAVEFORM FOR HZ .OPE, CLOSING VOLUME 

1588 /4. CVS-CALCULATES CLOSING VOLUME 

1 58$ /S STOREM-COMPUTES RV 

1598 /6. FPLOT-/Y PLOT OF SINGLE BREATH 

1591 

1592 
1393 

1594 

1595 
1598 
159? 


1598 

02350 

7200 

WASH* , CLA 

■'He. WASHOUT 

1399 

0235 1 

4775' 

JMS INTSU 

/SETUP FLAGS FRO INTBPT ROUT 

1688 

02352 

1365 

TAD WAMIO ’ 


1601 

32353 

1111 

DCS ADA 10 

/A 10 ECl’RS 

1632 

02354 

1366 

TAD KKEV 


1633 

02353 

3103 

*CA KEVIN 


1604 

9235S 

4774' 

JMS LOOPED 

/SET UP MORE CONSTANTS 

1605 

02337 

6537 

SAMPLE 

1606 

02369 

1 132 

TAT* VOLUME 


1667 

02361 

1114 

TAD DELAY 


1608 

02362 

6537 

SAMPLE 


1609 

02363 

6001 

\ 


1610 

02364 

3773' 

YLOOP 



1811 

1612 

1613 

tei 4 

I6i5 62335 2609 MADA10. MINT 

16 1€ 02366 2244 WHEY, VKEY 

16 1? 02333 2403 

1613 023’4 3035 

16 t 9 02235 2306 

1620 02333 1647 

[621 02377 1520 

1622 2406 *-24'32 

1623 02 - -(3 7263 HOC?. 'LA 

1624 024;’ 1 1 15" TA& ’ SKS7 

•625 02402 7040 F.ZA OLA THROUGH 

,626 02493 '0 BEGIN 

.627 02404 165 TAD NS TART 

.623 024*5 7iQ4« CIA 

.629 0247* 1133 ThD NS TORE ,-TS THEBE A SAMPLE PAIS I ,E ANALYZED 

638 02403 3343 SZ;* C** 7 LA 

631 02413 5221 .IMP f'LC /,’ES 

632 824’.; 136™ TAD 4FIH /NO. IS TEST COMPLETE 

633 02412 3450 SNA 

634 82413 5200 JMP MLCOP ✓HO 

635 02414 >5902 10? ‘VES 



'PyUTONfiFY FUNCTION TEST 


1636 

02415 

4777' 

JMS 

SBANAL 

163? 

02416 

4776' 

JMS 

STOREW 

1633 

02417 

4775* 

JMS 

FPLOT 

1633 

1640 

k641 

1642 

1643 

1644 

02428 

5470 

BEGIN 

1645 

02*2 i 

7209 I4CLC, 

CLA 


1646 

02422 

11 <=.5 

TOD 

H5TSKT 

1647 

0242? 

3372 

sen 

NUSEP 

1648 

02424 

1167 

i hD 

'i/¥ 1 RST 

1643 

02*25 

3373 

DCft 

KJSZP . 

1659 

02426 

60O2 

I OF 


1651 

074/7 

1772 

Trlfc 

I HUSK? 

1652 

82433 

3371 

d:h 

MhVJSE 

1653 

S2 * ’ i 

1773 

"7“i 7 > 

I MJSEF 

1654 

02432 

3370 

■ :P 

vVUSE 

1655 

02433 

Vi 65 

TClO 

HS7SRT 

1656 

92434 

7941 

Uh 


1557 

92435 

1 163 

7P.i> 

MS TORE 

1658 

02 43 5 

7841 

: i a 


1653 

92437 

3305 

■VIA 

UC 

1650 

02449 

7249 

CL ri 

cm 

1661 

0244! 

1165 

tad 

tfSTPRT 

1662 

02442 

30 1 1 

i)CP 


1663 

02443 

1165 

TOFj 

HSTAP.T 

1664 

£24^4 

3R 10 

I* CP 

1C 

1665 

02445 

7240 

CLh 

cm 

1666 

92446 

1 167 

tap 

10- I PST 

1657 

62447 

3813 

DCs 

13 

1653 

92450 

1 167 

TOD 

i-F!BST 

1663 

0245 1 

3012 

DCs 

1 2 

1670 

02452 

1410 

741’ 

Pig 

167! 

92453 

■3-r 1 1 

• 

1 1 1 

1672 

92454 

1412 

7hi> 

I 12 

1673 

92455 

3417 

DC 4 

i 13 

1674 

02454 

236" 

1 2 C 

UC 

1675 

1676 

1677 

02437 

5252 

Jtt? 

. -5 

1670 

42440 

7249 

CLP 

CMh 

1673 

0246 1 

1*153 

TOC 

NS TOPE 

1630 

02462 

3163 

DC A 

NS T I KE 

163 1 

0c 44 7 

72 48 

CLP 

Cm 

1682 

92464 

1162 

T45 

L3TCRE 

1633 

02403 

3162 

I s C 4 

/ ;■ 1 ■- r. i 

1634 

02-43 

600 1 

; ,- L *i 
, ■, 1 * 


1685 

02467 

i 0 

TAD 

WMJSE 

1586 

02470 

r 450 

SNA 


1637 

02 17 1 

577^ 

•JiT 

UZEPO 

1S88 

02472 

453-, 

flt: 

/OL 

1689 

02 -173 

447 ! 

BTrS 

1630 

824TO 

4487 

f Hi ; 

TEE 


PAL8-VSB i 1 ✓'21/7 4 PAGE 3-1 


/ANALYSE SB WAVEFORM 
/COMPUTE RV 
/PLOT SB WAVEFORM 


/VOLUME. NT PAIRS ARE STORED IH A QUEUE 

/TO BE USED BY i-JCLC 

/GUEUE STARTS AT NSTORT, VF IRST 


/THH ABOVE WERE 

-TO IWE THE DATA DOWN THE LIST 

• DECREMENT fISTOP.E . V5TORE SO INTERRUPT SERVICE PUTS 
/THEM IN RIGHT PLACE 


/DID SPIRO SERVICE ROUTINE RETURN 8 VOL 

/YES. MAS DUMPING OR MO BREATH 
/NO. SET VOLUME TO BTPS LITERS 



•PULMONARY FUNCTION 

TEST 


FfiL3-U3B 11/21x74 PAGE 8-2 

©91 

02475 

6144 


FPUT FKAC 

/SAWE 

692 

02476 

2343 


53 03 LSTVHL 

/SUBTRACT LAST WLUME 

.693 

02477 

6346 


FPUT '/OLD if 

/new much scaled last 48 msec 

.634 

02390 

1354 


FAC'D V ENT 

--SUMMED C/E P WASHOUT 

635 

02531 

0354 


FPUT LENT 


1696 

02502 

5144 


FGE7 FKfcC 


169? 

32503 

6343 


FFUT L5TVOL 


1693 

0250a 

0008 


FEXIT 



02505 

7249 


CLh CMS 


i?00 

02503 

3364 


T1CR BREATH 

'EXHALATION FLAG 

l?0t 

02507 

1371 


TAD MUSE 


1782 

82510 

4465 


UNPACK 


1783 

825 1 1 

4487 


FEttTES 


I704 

075 1 2 

3124 


FMUL NZPRI0 

/GET PHASED M2 SAMPLE 

1785 

92513 

6144 


FPUT FKftC 


1706 

02314 

3346 


FMUL MOLD ■ F 

/N2 '/OL THIS TIME FRAME «FN2*DELTA V 

\T$? 

02313 

1351 


FttDD 

••SUM GI'ES '4ASH0UT 

1709 

0251G 

6351 


FPUT nasuM 


1709 

02317 

5 I 44 


FbZT 770C 


1710 

02520 

236 1 


5SLO H2MRX 

/CH*CK M 2 CONCEMTSATrOM 

1711 

n-pC;-* t 

ULurU . 

0900 




1712 

07522 

1045 


ThP 4*5 

-'TiEEB MAX 5H£ FOP EACH BREATH 

1713 

02d23 

7518 


S?A 


1714 

EP52-- 

5280 


JMF ULOO? 


1715' 

625 25 

4497 


FEi 'TER 


1716 

02526 

5144 


FG3T FKhC 


1717 

02527 

6361 


FPUT M2WX 

-IF WAS HIGHER 3AI/E IT 

1713 

02510 

0088 




1713 

02531 

4576 


D6CM2 

/OUTPUT 0» METER 

1728 

02532 

7200 


*- L. w 


IT 21 

02533 

1154 


TRE VHXCV 

/FLAG SET NONZERO ON FIRST EOB 

1722 

92534 

7440 


SEP 


1723 

02533 

5208 


JMF ML 00? 


1724 

0233 b 

4407 


Pen fEi 


1725 

02377 

336 1 


FGtT 42MAV. 


1725 

025 .in 

6156 


75 UT ;iTIDrtL 

vMPY N2, FIRST EXHALATION IS AMBIENT N2 FRACTION 

1727 

02541 

09^ P* 


REMIT 

/USED IN HP Sri OUT EQUATION 

1723 

925 02 

5208 


JM? MLOCF 


1729 

02542 

0000 

LSTVOL 

* 0 * J :• 0 


173© 

025 *!■* 

G 




1731 

025 15 

0000 




1732 

' -i Zt 43 

O0G0 

'/OLD 17 

r 0 t 1* ' 


1723 

2547 

0009 




1734 

023 59 

0800 




1735 

02551 

O30U 

H2SUM- 1 

0:3:0 


1736 

0 2 t> j 

9090 




1737 

925“ 

0(500 




1733 

0255-1 

0890 

t-cNT, 0 


£> O 

1739 

02555 

0008 




1748 

02556 

0000 




1741 

©2557 

0000 

ET-Or© 


PS 

1742 

82568 

0009 



S S 

1743 

025© t 

0000 

HSMfiX.i 

0:048 


1744 

82562 

0008 



jo Z* 

1745 

02563 

8880 



ss 






h o 






a 









TFULMQNftRY FUNCTION TEST 


1746 

62564 

0060 

BKEftTH, • 

1747 

32565 

0038 

WO. 8 

1748 

02566 

8808 

WSTOP. 3 

1748 

0256" 

OQ00 

WFIH.- 0 

1758 

62570 

0803 

uwuse.3 

1751 

02571 

0000 

UNUSE. 3 

1753 

025?2 

0000 

KUSEP. 0 

1753 

32573 

0800 

IAJSE? . 0 


PflLS-^B 11^2 1/74 FftSE 8-3 



/PULMONARY FUNCTION TEST PRL8-t/SB 11/21/74 PAGE 9 


1754 

1755 
175S 
175? 

1758 

1759 

02574 

02575 

02576 

02577 

92G90 

3882 

340C 

3200 

3250 

2300 

7200 

PAGE 

WINT. CLA 


1768 

026S» 1 

1344 

TAP LSTCH 

/'WHICH t-^OL OR M2 

1761 

02602 

7640 

S2ft CLA 


1763 

02603 

5240 

JMP MS I NT 

LAST CHANNEL WAS 8TTBOGEN 

1763 

02604 

7040 

CMA 


1764 


3344 

DC4 LSTCH 

>LA5T CHANNEL MAS I'OLUME 

1765 

02606 

6537 

SAMPLE 

/-SAMPLE N2- GET VOLUME DATA 

1766 

026O'* 

742 i 

\'Yj L 


176? 

0261O 

1113 

TAB N2SAM 

* 

1766 

086 1 1 

653? 

SAMPLE 


1763 

026 12 

4467 

5R ISO 

HUSE FOB SPIRO CONTROL 

1770 

62613 

5317 

JMP TOOLG 

/"NO DATA THEBE 

17? t 

026 14 

5231 

Jn? EOB 

J END or BiREATH 

1773 

02615 

3765 

SLECF, DC A I INSERT 

/$Ai-i OCLLT1E SAMPLE AT END OF QUEUE 

1773 

02616 

5501 

or:? i xmtpt 

/RETURN FROM INTERRUPT 

1774 

1775 

1776 
177? 

02617 

7200 

TOGLO, CLA 

1778 

02620 

1 154 

TAD l/KKEY 

AMKEY IS FLAG 9-NO BREATHS 

1775 

1788 

1781 

02621 

7750 

SPA SNA CLA 

y\ WAITING FOB DUMP AFTER FIRST EXHALATION 

r~\ THROUGH FIRST BREATH AND RESET POINTERS 

1782 

02622 

5215 

JMP SLEAF 


1783 

02623 

4777' 

JMS I NTS 8 

/ONLY GETS HERE ONCE. THE FIRST ZERO VOL AFTER 

178.4 

1785 

02624 

7240 

CLA CMA 

■''THE FIRST EXHALATION 

•'FT SETS SUMS AND POINTERS AFTER AMBIENT EXHALATION 

1786 

0262*5 

3344 

DC A LSTCH 


1787 

02626 

7240 

CLA CMA 


1788 

0262? 

3154 

PC A WNKEV 


1789 

02630 

5215 

JMP SLEAF 


1790 

1791 

1792 

1793 
1754 

02671 

7200 

EOB- CLA 


1795 

02632 

1154 

TAP t'NNEY 

/FIRST ZOB? THS ONE WHERE AMBIENT GAS EXHALED 

!7?6 

02633 

^6 40 

SZA -■LA 

179? 

02674 

5215 

JM? SLEAF 

/NO 

1758 

02535 

7201 

CLA I AC 

-T’ES SET FLAG SAYING ONE EXHALATION 

1799 

02276 

3154 

L A t-’Nl'iEV 


188B 

0263? 

5215 

JMP SLEAF 


1801 

1S32 

1303 

1804 

1805 
1896 
180? 

62640 

,>•* 4-4 

/TOMES HE PE MHEH SAMPLED DATA TO GET IS H TRQGEN 

MSiiTT. DCh LSTCH 

1803 

02641 

*^537 

AMPLE 
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/SAMPLE VOLUME AT NEXT 43 MSEC TICK 
/ALSO GET NITROGEN DATA 
/PACK INTO ONE WORD 
/SAVE IT 

/IS THERE ROOM IN THE QUEUE 


/HO 


'PULMONARY FUNCTION TEST 


o03 

02642 

7421 


MQL 


.810 

02S43 

1 133 


TAD 

VOLUME 

,811 

0ZS44 

1114 


TAD 

DELAY 

!812 

02645 

6537 


SAMPLE 

1813 

02646 

45 IT 


CCMVPT 

ISl* 

02647 

3345 


DCA 

MB 

i8lb 

02350 

1164 


TAD 

MLAST 

1816 

02651 

7041 


C IP 


181? 

02632 

1163 


TftD 

NSTORE 

[018 

02653 

77m 


SW 

CLA 

1319 

02634 

5776' 


or ip 

ABORT 

1828 

02633 

1345 


TAD 

MB 

1821 

02656 

3583 


DCh 

l N STORE 

1822 

G2657 

1346 


TAD 

t/0LBF3 

1823 

02650 

35S2 


DCA 

1 Ik'STOSE 

1324 






1825 

0255 1 

1306 


Tsri 

HLhG 

1826 

02-^2 

7041 


f r 


(327 

02662 

1365 


7PL- 

IN5EPT 

1828 


30U3 


DCh 

13 

182D 

02665 

7340 


CTO 


1830 

02666 

1010 


TAD 

18 

1831 

02667 

3011 


DCA 

ii 

1832 

02670 

1366 


TAD 

NLAG 

1333 

02671 

7041 


CIA 


1334 

02672 

3345 


DCA 

H3 

1835 

02673 

1410 


TAD 

1 10 

1826 

02674 

3411 


DCA 

i n 

183? 

02075 

2745 


ISZ 

HB 

1833 

026 76 

5*.. '3 


J i v1 -7 

. -3 

1838 

02677 

1 343 


T6*' 

53 

13 '3 

337 rs£ 

7540 


O * Vi 

SZA 

1341 

027 : ; 

5334 


-r • }> 

N05S 

1842 

3870^ 

7700 


5 ‘ 7j 

CLh 

1343 

02705 

5326 


Tr-fr- 

l , 

•fOSFST 

1844 

02774 

1 582 

WST, 


I : *stoee 

1845 

32775 

7650 


C; 

CL A 

1346 

02706 

5323 


.7 '‘'i 

ISFM15 

134? 

02707 

1341 


■ M. 

1 fiTE TP. 

1343 

027 10 

704 7 


* _ 


1348 

02 T 1 1 

\i?6 


*•■ ■ *. 

HWLST 

1350 

i *.*■ 

Vj, . . 

7 { D0 


T ___ 

5nh C LA 

1351 

PC?7 ? T 

5723 


* ? .m 

J 

*sF!N1S 

1352 

02" i 4 

3341 


i 32 

ISiST? 

1853 

027 1 : 

22 J2 


T C, 7 

WWTE 

1234 

32716 

1532 


7’TL’ 

1 ITTCSE 

1855 

32 r 17 

Vi 


Dlh 

1 li'/^TE 

1356 

^ ^ 

36 3 


T£. 7» 

£ N5T0T1E 

1357 

327 3 \ 

3741 


DC A 

i UNSTE 

1858 

32722 

5334 


Jr ;f 

NOSB 

1855 

027 *.3 

720 1 

WFIMIS, 

:la 

I AC 

I860 

02734 

3343 


DC 4 

«I w 

1861 

02723 

5334 


T MO 

MOSS 

1832 

077 '7 

i cr -^Ti 

i ■-* u. 

>'05337, 

Th?* : 

: t-ST07Z 

IS63 

6272" 

"650 



j„ L: i 


/PUT N? AT END 

/GET VOLUME FROM FIRST IN, LAST OUT STACK 
/PUT IN QUEUE. THIS VOLUME WAS PELASTd BY 
/THE FILO STACK TO PHASE IT WITH N2 SIGNAL 

/M LAG- THE LENGTH OF THE STACK 


/IS THIS THE FIRST BEEftTH AFTER 02 INHALATION 
/NO, ALRE.-PV PONE 

'3-NO STOPT 

/VOLUME 3T"0T 

/YES. FINISHED SB ACQUISITION 
■'GET Me POINTER 


.•3COM FOP CHE MOPS FAIR??? 

/NO. END IT 
/!NC?5MSHT POINTERS 

/GET PHASED ME. VOL PAIRS AND STORE 


/E/'T 

/THROUGH SB. SET FLAG 


/THIS LOO? DOES NT LET SB START UNTIL BREATH TOES 


/WHERE THE SUFFER MAS .‘TUCK 
/SET AUTOINDEX TO MOVE BUFFER UP 

HOW MANY TIMES THROUGH LOOP 

/MOVE THEM 



/'PULPIOHftFY FUNCTION TEST 


PflL.S-l'SB It -'31/7 4 PftGE 9-2 


1864 

02730 

5334 

JMP NOSB 



1865 

02731 

7040 

cm 



1866 

02732 

3343 

Kfl 68 



1867 

02733 

5304 

JF'F WST 



1868 






1869 






1870 






1371 

02734 

7260 

NOSB, CLA 

/EKIT 


1872 

02735 

210c 

ISZ 1^*3 TORE 



XS73 

3 272$ 

2163 

I S3 M STORE 

^INCSErCENT POINTERS 


1874 

32737 

4775' 

JM5 T1H1NC 

/IMCSEKEN7 TIME FOR END OF TEST CHECK 


1875 

02740 

5501 

•JKP I XITPT 



1376 






1377 






1878 






1879 






1883 






1831 






1832 

0i2 7 4 

Ltoo e 

WNS7R.0 



1083 

02742 

0000 

U/STE.* 



1834 

9274.5 

0020 

38.9 



1835 

027 44 

0000 

LSTCH.-1 


p c 

1836 

02745 

0003 

MB, 9 



1637 

027 44 

SO00 

i/CLEFR. 0*9 1 0 



1833 

02747 

OOOO 



of 

1339 

02750 

3000 




1890 

02 7 5 t 

0030 

8; 0:0 



1391 

02732 

0080 



& 5 

1892 

02773 

0008 



nip 

1833 

32754 

8000 

8 ; 6 : sj 


P>- #*■ 

1394 

02755 

0000 



clg 

1895 

8275G 

0030 



52 

1896 

02757 

0030 

0:0:0 


^03 

1897 

32700 

0008 




1898 

0270 1 

6008 




1399 

027^2 

nrtoo 

fl T 0 ! 



1900 

U^i I "If l< 

0 JUU 




133 i 

027 '4 

SOSO 




1302 

0“ H ~5 

27G2 

T Kip *7 I/O’ ^-1.1 A 

+ 1 ‘ J-*- - • - - 

.THESE 2 C TEL DEL£Y 


1903 



HLhO . 14 



1334 

n r ~-7 

028 * 

L15 • T2' *.T 'CC-TLC 



1905 

02770 





1936 

0277: 

1 4 r— i -y 




1307 

02?7 - 

4040 




1308 


4000 





mjLMQNftKV FUNCTION TEST 


1909 

02775 

1910 

9277S 

19 1 1 

02777 

1912 


1913 

0300B 

1914 

esc: 1 

1915 

035i02 

1516 

03003 

1917 

03084 

1918 

03003 

19 1 a 

03006 

1920 

03507 

1921 

03310 

1922 

0-30 1 1 

1523 

03012 

1924 

13 

1525 

03314 

i*?2b 

f+7" i cr 

1527 

a? 3 4 

1523 

fiTiT* * T" 

1529 

0332? 

1530 

030 21 

1931 

03022 

1532 

03023 

1 533 

03 3 24 

1534 

03025 

1535 

03026 

1536 

03027 

1537 

03330 

1333 

0305 ; 

1339 

030:2 

1 540 

07733 

1541 

1542 
1343 
1544 
1945 
1346 


1347 

03033 

! ;’42 

037.36 

1343 

”” 

! 356 

1551 

1552 

i '-"* 5 ■■*n 


1 953 

57043 

1:34 

0 77- 1 X 

s 5 -■ '3 

07! 0 -5 

i 5 : 6 

77 . 

*557 

07 L -7 

1553 

07 7:0 

195:' 

0335 1 

i960 

037^2 

1561 


1:22 

f- T ; ' ♦ 

1963 

i ■' ~ “ 7 


313^ 

3527 
36CQ 

-50C'3 *3000 

U0tf0 i MTSU,0 
t in 

3777 ' 

: 172 
3776' 
i ie? 

7131 
\ 165 
3133 



TAD 1-CiSTRP 
DC A LiNSTR 
TP 3 iVSTPP 
L«:A turSTP. 
77 1 t- T I PST 
I'CP '■ 'STORE 

7h5 ns tart 

POP fi STORE 

m mumzpo 
DCh mb I 
740 stzeo 
DC- >1 
I"..- ; i-J 
sis CBl* 


!■; 
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✓SET UP SINGLE BREATH PC INTERS 
7SET UP WR5HOUT POINTERS 

-'CLEAR DA TP SEEPS 




XPULnOWFtRY FUNCTION TEST 


PfiL6~l^3B 


ll.'2lr?4 


PAGE 16-1 


1964 

03856 

5635 

JMP f LOOPSli 

1965 

03057 

2545 

ZST, LSTVOL-l 

1966 

03068 

7753 

IN M. -25 

1967 

03C5 1 

0008 

ZC,S 



/PULMONARY FUNCTION TEST PAL3-VSB I i/21/74 PAGE 13-2 


1963 



EJECT 



1969 






1970 






1971 



/THIS ROUTINE ENTERED 

AFTER ft ZERO VOLUME RETRIEVED 

1972 

1371 

1974 

1375 






1376 

03062 

7200 

WZEPG. CL H 


1377 

03063 

1774* 


TAD BREATH 


1378 

03964 

7653 


SHft CLft 

/FIRSi ZERO RETURN AFTER A BREATH <E0B3? 

1373 

03065 

5773* 


jrV 5 I-ILOOF 

/YES EXIT 

1930 

03666 

3774' 


DCh bkeath 

'-NO CONTINUE 

1331 

03067 

1772' 


TAD ET 

/HAS ENOUGH TIME PASSED TO END WASHOUT 

1932 

03073 

7650 


bHn CLH 

/( 4696*40 rtSEC) 

1983 

0307 1 

5318 


JKP ZLEfH'T 

/NO 

1934 

03677 

4407 


FZNTZ3 


1335 

03G73 

577 r 


36 ET 

/YES TIME SAYS OK TO END 

1336 

03074 

223 1 


F3u3 7 TO 3 

. /UTS MAX HP IN THAT BREATH -LT-0.92 

1937 

O3075 

0369 


FEXIT 


1338 

03774 

7203 


CL4 


1989 

03077 

1045 


T4D 45 


1990 

03190 

7700 


SMA OLA 


1991 

03101 

5316 


3 1"? ZLEAt-T 

/NO 

1932 

O3I02 

1339 


TmD ZFE5 

/YES IT WAS. IT THE FIRST CHE. 

1333 

93193 

7648 


SZh CL A 


1834 

03104 

5335 


Jr? ZrIM 

/HO IT HAS NOT. ZFIN HAS SET BY THE PREVIOUS BREATH 

1395 

93105 

7081 


I AC 


1336 

03160 

3330 


DC A 3FB3 

/IT M3 S THE FIRST OF TWO IN A ROW SO SET ZFRS 

1887 

03107 

5313 


JMF ZLEfiXEH-3 

/SMP THE PART THAT RESETS ZFIN 

1998 

03119 

7200 

ZLEA17E* 

CLh 


1999 

03111 

3330 


BCA ZFKS 

/RESET ZFIN TO ASSURE TWO BREATHS IN A ROW 

2000 

03112 

3770* 


E-CH L5TVOL 


2001 

93 1 13 

3767' 


DC A LSTVOL+S 

/RESET LSTVOL TO B. SO NEXT SUBTRACTION FOR 

2002 

03114 

3766' 


DC A LS*TVQL+2 

/DELTA V IN 46 MSEC DOES NOT GIVE A NEGATIVE 


03! 15 

777 1 ' 


nrq 


2304 

kj ^ ^ 

3765 ’ 


OCA N2r3X+l 

/RESET N2MAX FOP NEXT BREATH 

2035 

•j5 1 

3764" 


DC4 W2MAX+2 


2906 

03123 

4407 


3EHTEE 


2397 

9312 : 

5763' 


FCET HENT 


2373 

07122 

2762" 


FSliS >TT2 

/SUBTRACT .2 FROM VENTILATION AT END OT BREATH 

2033 

53 : py 

0000 


32-Cl * 

/TO GiVE ALVEOLAR VENTILATION C .2 FUDGE FOP DEAD SPACE 

2015 
2S1 1 
2012 
2613 
2014 

65:24 

5773' 


Ji*?F WLCOF 


2015 

03125 

7249 

2FIM.CL& CKO 


2016 

03126 

3761' 


TCft NF1N 

/END OF WASHOUT FLAG 

2017 

03127 

5773' 


JM? ML OOP 


2018 

93 130 

0009 

ZFRS, 0 



2919 

03131 

77 73 

PT02, 77 

?3:.243>3;5606 

/e.?2 

2020 

03132 

2436 




2821 

03 1 33 

56G6 
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2922 



EJECT 


2023 

2024 

2025 
282G 



/ROUTINE TO KEEP TRACK 

OF TINE OF WASHOUT 

202? 

2028 

03134 

0000 

TIMING- B 


2029 

03135 

1154 

TAD i/NKEY 


2030 

33136 

7650 

SNA CLA 

A&SWJUT STARTED? 

2031 

03137 

5^34 

JM? I TIMING 

/ no . EXIT 

2832 

03143 

2730' 

1ST ET+t 

/YE5 SUn? 40 MSEC COUNTER 

2833 

33141 

7410 

SKP 


2034 

03 1 42 

2772' 

ITT ET 

✓THIS ONLY HAPPENS WHEN ET+1 Oi/ERFLCWS 

2035 

£036 

33143 

5734 

■JN? I TIMING 


233? 





2038 

2039 



/FLOAT 9 ’OS ITU/E 12 BI 

T Hums? 

2040 

2041 



/TO ft FRACTION OF 4896 


2042 

2843 

£844 

03144 

0088 

WD2FLT. 9 


2S45 

03145 

7186 

CLL 


2046 

03146 

7013 

RAP. 

/'SHIFT HIGH T 

294? 

03147 

3845 

i^CA 45 

✓PUT IN rsB 

2048 

03153 

7010 

Tap 


2349 

03151 

3046 

D C ft 46 

/-TUT THE SHIFTED OFF BIT INTO L5B 

2850 

63152 

3044 

DC 4 44 

✓ ZERO EXPONENT AND 

2051 

33 1 53 

4407 

FEMT23 


2052 

03 1 54 

7838 

7NOSW 

-/"NORMALISE 

2853 

03155 

0000 

L" X.s I 1 


2854 

03 1 4 3 

5744 

jrr? I J4P2FLT 




/PULMONARY FUNCTION TEST PAL8-X9B 11/21/74 PACE 18-4 

2055 EJECT 


2056 

63160 

2563 



2057 

031G1 

2567 



2058 

031 £2 

2076 



2059 

03163 

2554 



2060 

03164 

2563 



2061 

03165 

2562 



2062 

03166 

2545 



2063 

03167 

2544 



2064 

0317Q 

2543 



2065 

03171 

2561 



2066 

03172 

2557 



2067 

83173 

2400 



2068 

03174 

2564 



2069 

03175 

3441 



2370 

03176 

2742 



2071 

03177 

2741 



2072 


3200 

*3208 


2373 




, 

2074 





2075 



/ROUTINE TO COMPUTE 

WASHOUT RESULTS FTER TEST 

2D76 

0320© 

0003 

STOREW, 0 


2077 

03201 

7203 

CLA 


2073 

03202 

1777' 

TAD ET 


2079 

03203 

3045 

DCA 45 

/(CET*4896)+CET*!>5*.043-TIME OF WASHOUT IN SEC 

2080 

03204 

1776' 

TAD ET-H 


2081 

03205 

304S 

DCA 46 


2082 

0320c 

1247 

TAD CK27 


2083 

03207 

3044 

DCA 44 


26S4 

03213 

4407 

FENTEE 


2085 

03211 

7000 

FHORM 


2086 

03212 

3244 

FMUL CONST ' 

/CONST* .0312*. 949/60 

2037 

03213 

6144 

FPUT FKAC 

/FUDGE FO? BODY N2 MASHED OUT BASED ON TlfE C? WO 

2388 

032 3 + 

5775' 

FCET H2SUM 


2033 

03215 

2144 

FSU5 FISAC 

/SUBTRACT THIS FROM ACCUMULATED EXHALED N2 

2080 

33216 

6144 

FPUT FKAC 


2091 

0321^ 

5156 

FGE7 NT I DAL 

/GET FN2 OF FIRST EXHALATION (AMBIENT! 


2092 03223 2774' FSU3 N2MAX /SUBTRACT FN2 OF LAST EXHALATION 

2093 03221 0121 FPLTT EXP 

2334 03222 5144 FGST FKAC /PIYIBE CORFECTSB TOTAL EXHALED N2 

2335 03223 4121 FDIX EXP .'BY THIS DIFFERENCE IN C0NCEHTRA7 IONS 

2096 33224 2773' F3UB F?T2 /SUBTACT h FUDGE FOR DEAD SPACE 

2037 33225 6772' FFUT EX /AND i-£ NOW HPXE FOUND EX 

2093 332 ’>3 5771' FGS7 T’EMT 

2099 03227 477 2' FCUX SX 

2100 332H0 6770’ FPUT XA2RX /XA2EX*EX/X£HTr-ATI0N DURING WASHOUT 

2101 3323 1 5767' FGE7 XC 

2132 63232 3800 FZX’T 

2103 03233 7280 CLA .'GOOD XC7 

2104 03234 1845 TAD 45 

2105 03235 7659 SNA CLA 

2103 03236 5300 .IMP I STOBEW 

2107 0323? 4407 FENTER 

2108 03240 1772* FADD ?' J 

2109 07241 3766' fPUT TLC 


/YES. TLC=RX+XC 



✓PULlIQHflKY FUNCTION TEST 


P8L8-V3B 11421/74 PflGE 18-5 


2118 

03242 

0080 

FEXIT 


2111 

03243 

5600 

JMP l STOBEH 


2112 

2113 

03244 

7761 

CONST, 776 1 ; 2563 : 6725 

✓8. 8686388 

2114 

2115 

2116 

03245 

03246 
0324? 

2563 

6725 

0027 

CK27.27 




/PUU’iONfiRY FUNCTION TEST 


211 ? / 

HI 13 /ROUTINE TO ANALYZE 

2119 

2120 

2121 


2122 

03250 

0008 

SBANAL.8 

2 3 23 

03251 

7209 

CLA 

2124 

03252 

1765' 

TAD UE/STR 

2125 

03253 

3764- 

DCA VUSE 

2126 

03254 

4763' 

JMS MAXT 

212? 

03255 

3341 

DCA INDRC 

2128 

03256 

1741 

TAD I INDRC 

2128 

0325? 

4536 

FLTVCL 

2130 

0326£ 

4471 

3TPS 

2131 

6326 1 

4407 

FENTE5 

2132 

93262 

6767' 

FFUT VC 

2133 

03223 

5762" 

FGF.T FPTT5 

2134 

03264 

9000 

FEXIT 

2135 

03265 

476 r 

JMS SEARCH 

2 1 36 

03266 

333? 

DCA PTT30 

213? 

3326? 

4407 

P ENTER 

2138 

03270 

5762 # 

FGET FPTO5 

2139 

03271 

1768' 

FPDD FPT25 

2140 

03272 

1760' 

FADD FPT25 

2141 

03273 

0800 

FEXIT 

2142 

03274 

4761' 

JMS SEARCH 

2143 

03275 

3340 

DCA PT1250 

2144 

d32^S 

7201 

CLS !AC 

2145 

0327? 

: 172 

TAD MUSTS? 

2146 

03200 

7e41 

CIA 

214? 

03301 

1337 

TAD FT750 

2143 

03302 

7519 

SPA 

2149 

03303 

7041 

CIA 

2150 

03304 

1171 

TAD UMS7BP 

2151 

93305 

3337 

DCA ?T750 

2152 

03306 

-* 1 
l £-*J 4 

CLA IAC 

2153 

63307 

X 172 

TAD ' S-STSP 

2154 

63310 

7041 

CIA 

2155 

03311 

1343 

TAD PT1250 

2156 

03312 

7510 

SFh 

215? 

03313 

7041 

CIA 

2158 

93314 

1171 

TAD WNSTRP 

2159 

33315 

33 4P 

DCA PT1259 

2160 

03316 

1737 

TAD ; PT730 

2161 

03317 

4405 

UNPACK 

2162 

03320 

4487 

FENTER 

2163 

03321 

3124 

FMUL N2PR18 

2164 

03322 

6144 

FPUT FKAC 

2185 

03323 

0089 

FEXIT 

2166 

33324 

7200 

CLA 

216? 

03325 

1740 

TAD I PT!c50 

2! 68 

03326 

4465 

UNPACK 

2169 

0332? 

4407 

FENTER 

2179 

03330 

3124 

FMUL M2 ?R 19 

21^1 

03331 

2144 

FSJS FKAC 
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EXHALATION AFTER BREATHING I80X 06 


/USE FEV ROUTINES TO FIND l*HX ‘/OLUME 
/OF THIS EXHALATION 


/GET IT. CaZ’EST TO LITERS STPS 


/STORE AS VC 

•USE FEZ ROUTINES TO FIND VOLUME 
/SAMPLES CORRESPONDING TO 8.75, 

/ 1 . 25 FOE N2SLGFE 


/STORE THESE ADDRESSES IH PT750. FT! 250 

/FIND DISPLACEMENT FROM START OF ARRAY 'OR EACH 


/USE THESE D ISP- ACEPTNTS FROM STH3T OF N2 
/SPRAY TO GET CORRESPOND INC H2 SAMPLES ADDRESSES 


/FOE BOTH VALUES 


/STORE IN PT750. PTI250 

/GOING INDIRECTLY. GET THE BJO MALUES 


/CONSORT TO FRACTIONS 


/TAKE DIFFERENCE 



/FULMCP M >KY FUHCTIOH TE5T • im8*-VSB 11/31/74 PftSE Tl-1 

2172 03332 3173 miL F100 /T«JL BY 100 TO PUT 1« S#CafT 

2173 03333 6757' FPUT N3SELT /STORE AS N2DEL? 

2174 03334 0886 FEXIT 

2175 93335 4756* JUS CVS /SO COMPOTE CtGSIHG WStCK 

3176 03336 5630 IMP I SBflNOL 

3177 03337 9000 PT758*S 

3178 03340 0000 PT1250- 9 

2178 03341 0900 INDRC.0 

3180 03343 7476 LI. TEXT *<>»»RV 

3131 03343 7676 

3183 63344 7676 

3133 03345 3326 

2134 03346 4840 . 

3135 03347 4840 

3186 03350 4040 

3187 03351 4000 




/PULMONARY FUNCTION TEST 


2188 



EJECT 


2189 

03356 

3660 



2190 

03357 

1203 



219 J 

03366 

207© 



2192 

33361 

2104 



2193 

03362 

2073 



2194 

03363 

2277 



2195 

Q3364 

1647 



2196 

03385 

274? 



31S7 

03366 

1217 



2198 

33367 

1214 



2199 

03370 

1211 



2208 

0337! 

2554 



2201 

83372 

!200 



2202 

03373 

2876 



2203 

83374 

2561 



2204 

33375 

2551 



2205 

33376 

£560 



2206 

83377 

2557 



22^7 


3480 

*3480 


2208 





2209 





2210 



/ROUTINE TO 

PLOT S 

22xi 





2212 





8213 

03408 

0000 

FPLOT, 0 


2214 

0346! 

72i30 

CLA 


2215 

03402 

6065 

DftC 


2216 

G3403 

7001 

IfiC 


2217 

03404 

6065 

DttC 


2218 

03405 

6002 

in? 


2219 

C 3 4u 6 

1 171 

Tad 

MNSTEP 

2220 

03407 

3010 

DC A 

19 

222 1 

03410 

1172 

TAD 

WVS 72? 

2222 

23411 

3811 

SCh 

11 

2223 

03412 

1010 

TAD 

10 

2224 

03413 

7041 

CIA 


2225 

83414 

1777’ 

TAD 

PWSTR 

2226 

83415 

7041 

CIA 


2227 

034 IS 

3121 

DC A 

EXP 

2228 

03417 

1 410 

TAD 

I 

2229 

03420 

742 i 

: |; >L. 


2230 

-~l ■'t? .1 : T 

X 

>41 1 

T-D 

I 1 1 

223! 

03422 

2121 

T c; " 

t?v:> 

2232 

0S/-23 

425" 

" 7.1.27 
*J • i 

fv-r 

4. ..'w’ 4 

2233 

03 124 

4243 

NSWTI-JM5 rr£ 

iWrilT 

2234 

03423 

1242 

T7D 

TOWN 


S3J20 

6H73 

CTRL 

2230 

C3427 

1410 

TAD 

! 13 

2237 

83430 

7421 

i*CiL 


2238 

03431 

Ml 1 

ThD 

I !! 

2239 

03432 

4263 

JMS 

PLOT 

2240 

03433 

2121 

v-Z 

EXP 

2241 

03434 

5224 

■Tf 1? 

Msurn 

2842 

03455 

1241 

CAD 

up 
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BREATH ON XY PLOTTER 


/PEN TO ORIGIN 


/SET POINTERS TO START OF l/OL, FNE ARRAYS 


/GET HUMBER OF POINTS TO PLOT 


/GET FIFE” PAIR 

✓VOLUME IN AC. FN2 SAMPLE IN MG 
/BUM? COUNTER 
/GO PLOT FIRST 
✓VIA ! 7 3!3 MSEC 

/LOWER PEN 


/GET NEXT r AIR 
/GO PLOT 
/THROUGH? 

/NO* GO TO START OF LCD? ONP WAIT 
/YE3 RAISE PEN AND EXIT 



/PULHGmSY FUNCTION TEST 




HSZl/74 


PACE 1 I“3 


2243 

0343C 

6075 

CTRL 

2244 

0343? 

6B01 

ION 

2243 

33440 

5603 

JtP 1 FPLOT 

2246 

03441 

7??1 

UP. 77? 1 

224? 

03442 

0001 

DOWN. 8831 



/FULHONflRY FUNCTION TEST 


2248 



EJECT 

2249 

83*43 

0808 

MS** IT, 8 

2250 

83444 

7201 

CLA I'flC 

2251 

03445 

7840 

CM4 

2252 

03446 

3262 

BCA MSWfi 

2253 

2254 

2255 

2256 

03447 

6533 

MSWTB. 

6533 

225? 

03450 

5247 

JMP .-1 

2258 

03431 

6537 

SAMPLE ■ 

2259 

03452 

7200 

CLA 

2268 

03453 

1 132 

TAB VOLUME 

2261 

03454 

1114 

TAD DELAY 

2252 

PJ3455 

6537 

SAMPLE 

2253 

03456 

7200 

CLP 

2254 

0345? 

3232 

fSZ MSWA 

22~3 

0345'7 

5247 

JK? MSWTB 

2256 

0346S 

5643 

JI*P I MSI*!' 

2257 

2258 

OOuCk 

03452 

0000 

MSMA.8 

w*_ J 

2370 

2371 

2272 

2273 

2274 

2275 

2276 

2277 

03463 

8008 

/ROUTINE TO SCALE 1A 
PLOT, 0 

2273 

03464 

3122 

DCA MANTIS 

2279 

03465 

7501 

moa 

2233 

03466 

4465 

UNPACK 

229! 

83457 

4407 

FSNTER 

2332 

034^0 

3124 

Fr a JL HEPR10 

2233 

33471 

3137 

FMUL 52947 

22 ?4 

03472 

0000 

FSXIT 

2235 

034-- 3 

2044 

ISZ 44 

2236 

9347a 

4472 

FIX 

2237 

03475 

7100 

,-T - 

2233 

03476 

7204 

29.1, 

223* 

03477 

0116 

h\6 «7?74 

22 90 

07573 

3323 

1*5.4 i2H0L$ 

2231 

0350 1 

112? 

Tr*J ilftMTIS 

2392 

033 li 2 

4535 

FL1V0L 

2293 

03503 

447 1 

3 7?S 

2224 

33304 

4407 

FKHTES 

2295 

03505 

4324 

rDlV 77 

2235 

035CS 

7 137 

FMUL F2947 

2297 

03507 

0000 

FEN IT 

2293 

03510 

447? 

FIN 

2299 

03511 

7! ou 

CLL 

2300 

03512 

7034 

m 

2301 

03317 

0116 

hND K7774 

2302 

03514 

7001 

i a: 


FftLB-k9B assist* mm n-4 

/LOOP TO DELAY 88 MSEC 
/COUNTER TO -i. > 

/WRIT F08 TWO AD COHVE8SICHS AT 48 MSEC Eft 



Nc PAIRS RND 3DII) TO PLOTTER 



/SAVE VOL SAMPLE 
/SET H2 SAMPLE 

/CONVERT TO FRACTION RANGE B-* 

/MUL TO SET FRACTION OF FULL SCALE 

/INCREMENTING EXPONENT PUL BY 2. GIVING RANGE OF 8-.S 
/MAKE AH INTEGER>» 

/WILL EE, POSITIVE. mKE UNSIGNED 12 BIT * 

/SET CHANNEL 0 
/SAi’E 


.'VOL TO BTPS LITERS 

/DIVIDE VCL BY ?, SIXTHS FRAC OF FULL SCALE 
/FPRC OF FULL SCALE COUNTS 


/POS 12 BIT INTEGER 


/SET CHANNEL 1 



-'PULMONARY FUNCTION TEST 


PAL8-V9 9 IIS21 STM PAGE I 1-5 


2303 

03515 

6065 

PAC -'SEND IT 

2334 

03516 

7200 

CLA 

2335 

33517 

1323 

TAL N2H0LB 

2306 

83528 

6065 

DSC -'SENT N2 UftLUE 

2307 

03521 

7200 

CJLA 

2388 

03522 

5663 

JMP I PLOT ."EXIT 

2383 

33523 

3000 

H2H0UL8 

2310 

83524 

0003 

F7, 3 T 3480 ' 9S00 

231 1* 

03525 

3400 


2312 

03526 

0000 


2313 

2314 

2315 

2316 

2317 

2318 

83527 

7200 

ABORT. CLA 

2313 

03538 

1333 

TAD ABTMPT 

2320 

02531 

4512 

OUTPUT 

2" 21 

03532 

5470 

B56IM 

2322 

03533 

3534 

ABTMPT. AOTMG 

2323 

03334 

2324 

ABTrS. TE.\T ' STORAGE OVERRUN ABORTO* 

2324 

83535 

1722 


2325 

03536 

0107 


2326 

03537 

0540 


2327 

03540 

1726 


2328 

03541 

0522 


2328 

83542 

2225 


2330 

03543 

I64S 


2331 

03544 

0162 


2332 

*Jv- 45 

1722 


2333 

83546 

2474 


2334 

035-7 

7600 


2335 

83350 

0009 

PRTBF?..3':e:et8:0:3:0:0:B;0?0:a;8:0:0J0 

2336 

03551 

0092 


2337 

03552 

0006 


2338 

03553 

0000 


2338 

63554 

3003 


2340 

03535 

0300 


2241 

07356 

0009 


2342 

035 =i 7 

8036 


2343 

83560 

0000 


2244 

03561 

0000 


V? 1C 

03562 



2346 

0336 i 

00C3 


334? 

83564 

0380 


2340 

33535 

0009 


2348 

03566 

8C03 


2353 

0 jv 1 

3668 


2351 

03578 

0066 


2352 

83571 

3606 




/PULMONARY FUNCTION TEST PALS-VSB 11/ZU7A PAGE 12 


2353 

83577 

274! 




2354 


3600 

*3608 



2355 






2356 






7357 



/BOUTI 

NE TO COMPUTE CLOSING /OLUnES FROM SINGLE 3 HEATH 

2353 






2353 






2360 






23$ 1 

03630 

0000 

CKS-3 



2362 

03601 

4487 


FENTEB 


2363 

0360 i 

5777* 


F8ET VC 


2364 

03603 

2363 


?3l?B F1PT5 

/USING FEV ROUTINES FIND P Ul.r* ri i/JURC ARRAY 

2365 

03604 

0003 


FEX IT 

/CORRESPONDING 70 tVC-t.5) Ltiw*S 

2366 

03665 

4778* 


JttS 5E&£CM 

/tHC-2.3l LITERS 

2367 ■ 

. 036G6 

335! 


DCh lsend 

-'THESE VALUES MOULD MEED TO 31 KJ I >.'-J 

2363 

0360" 

*1407 


FSHTEft 

/DOWNWARD IF THE SOUTINE WERE TO BE USED WITH 

2363 

036 i 0 

5777' 


FGE7 <-C 

/SUIMECT5 WITH LARGE CV 

2370 

0*58 1 1 

2366 


FSUB F2PT5 


“ 77 t 
L.J! L 

056 

*000 


•EXIT 


2372 

056 13 

4776* 


JK3- SEARCH 


2373 

03614 

3352 


•JCN lsgtrt 


2374 

03615 

13*7 


IAS LSSTRT 

/GET LEAST SQUARES START AND FINISH ADDRESS 

2375 

03616 

3353 


DC* LSSTR1 


2376 

036 17 

4775' 


JITS CLSUfl 

/CLEAR LEAST SQUARES SUMS 

2377 

03620 

1352 


T A7> LSSTRT 


2373 

03621 

1350 


TOD LSDEL 


2373 

03G22 

3354 


DC A FSSTET 


23 SO 

03633 

1754 

CHOC?. TAD I FSSTRT 


2331 

03624 

7421 


mol 

/INDEX THROUGH ARRAYS GETTING N2.VCL PAIRS 

2332 

03625 

175? 


TO3 I LSSTET 


2333 

33626 

4774' 


i -rz suns 

/SOUTINE TO DO SUMS FOH LINEAR REGRESSION 

2334 

03827 

2354 


l‘3Z FSSTRT 


2635 

03633 

2322 


:SZ LSSTRT 


2336 

0363I 

1352 


TOD LSSTRT 


2237 

0363? 

7041 


CIA 

/THROUGH? 

2338 

63633 

1351 


TAD LSEMD 


2389 

03634 

7740 


SMA SZA CLA 


2390 

03625 

5223 


jmp CHOOP 

/NO 

2391 

03636 

1021 


TAD N+l 

/YE 5, GST NUMBER OF POINTS 

2792 

03637 

4474 


FLOAT 


2333 

C3640 

4407 


FENTER 


?; 4 

03641 

6O70 


^oirf ^ 


"~‘-i v 5 

03342 

ae&a 


i-EXIT 


2390 

03 6- -? 

431^ 


•IMS LSQ 

/COMPUTE SLOPE- INTERCEPT BASED ON SUMS 

23?7 

03644 

1533 


TAD LSSTSl 

/%£ MOW KAN'S FME-'SLOFS-VOL) + INTERCEPT 

27^2 

03343 

3352 


DC A LSSTET 

/ON i NTEStfAL OC-2.5, PI-1 .5) 



i353 


TAD LSSTSl 

/RESET POINTERS TO START OF INTERVAL 

2480 

03647 

'350 


TOD LSDEL 


2401 

0363? 

3334 


DCA FSSTET 


2402 

03651 

1754 

CKLP, 

TOD I FSSTET 

-'START OF LOOP TO LOCATE LAST POINT FOR WMCH 

2403 

03652 

44G5 


UNPACK 

/ACTUAL SAMPLED M2 IS LESSTHAN PREDICTED BY 

2404 

05653 

4407 


FENTES 

/REGRESSION. EXTRAPOLATE BEiOND IMTEPV'AL 

2405 

03654 

3124 


FMUL HEPS 13 


2405 

3363* 

SI 4-1 


FP'JT FKAC 

/GET SAMPLED M2 IN FLOATING 

2407 

23656 

£073 


FEX IT 




mjLMOHfiRY FUNCTION TEST IUZU7A P9GE 12-| 


2408 

0365? 

1753 

TOD I L3STR1 


2408 

33660 

4536 

FLTV'GL 

/GET VOL IK BTP3 LITERS 

2410 

03661 

4471 

3TF5 


241! 

03662 

4487 

TENTER 


2412 

83603 

3355 

FilUL 3 LOPE 

/MJL 3Y SLOPE 

2413 

03664 

1360 

FmOD wt 

/'ADD INTERCEPT 

2414 

03665 

2144 

FSU3 FKflC 

/SUBTRACT SAPffLEB H2 

2415 

03666 

0000 

FEXIT 


2416 

83667 

1045 

TOD 45 


2417 

03678 

7710 

SPA CLP '^BO'E 

LINE?. 

2413 

03671 

5274 

JH? wKLPl 

/YES 

2418 

03672 

1333 

TM ? SSTB l 

/NO SAVE THIS POINT AS LAST 

2420 

03672 

3352 

OCA ISSTST 


2421 

93674 

2353 

CKLPMSZ L33TKI 


2422 

03675 

2354 

iSZ FSSTTT 

/PUMP POINTERS 

2423 

03678 

1353 

TAD LSSTR1 


2424 

03677 

70-41 

CIA 

.'THROUGH? 

2425 

03708 

1773' 

ThD UUST3 


2426 

8370 1 

7740 

Sift 3ZA CLA 


2427 

83782 

525 1 

j*? c*a? 

/MO GET NEXT POINT 

24£3 

83703 

1732 

TAD 1 LSSTET _ 

-'YES ■ CHECKED TO END OF BREATH 

2429 

037)4 

4536 

FLTVOL 


2430 

037G5 

447 1 

FTPS 

/SET LAST PCI.iT BELOW TO STPS ] 

2431 

03706 

4407 

FENTE8 


2432 

83777 

6144 

FFUT FKftC 


2433 

0T*?0 

5777" 

FGET XC 


2434 

0371 1 

2144 

FSUB FKSC 

/SUBTRACT FRCH VC 

2435 

03712 

6772* 

F^fjr CK 

-'STORE S3 CLOSING VOLUME 

2436 

Q3713 

000C 

PEXIT 

■ 

2437 

03714 

5680 

JKP I Cl^S 



2433 

2438 

2440 

2441 

2442 

2443 .'ROUTINE TO USE SWTS TO CALCULATE 31073. INTERCEPT 


2444 

■ @37 15 

@098 LSQ.0 


2445 

637 16 

4487 

TT tT 1 ^ -T~!T p 

2446 

037:7 

E02S 

76 2T EX 

2447 

83720 

302G 

PHIL 3.X 

244H 

03721 

6144 

F7L7 r LPC 

2448 

83722 

502C 

r ! o :-T N 

2459 

03723 

3834 

F' r ‘)U 2X2 

245 1 

03724 

21-44 

7il:2 -KftC 

2432 

83725 

6121 

FPL 7 EXP 

2453 

33726 

5826 

- 1 3-C * 

2454 

©3727 

3031 


2455 

03723 

6 i 44 

FPL 7 FI AC 

2456 

0373 1 

5020 

FCE7 N 

2457 

83732 

3023 

FMIL EXY 

2453 

03733 

2144 

7643 FXhC 

2458 

03734 

4121 

FHl' EX? 

2460 

83735 

6355 

FFUT SLOPE 

2461 

83723 

5826 

r*SE7 EX 

2462 

83737 

3023 

“Cf-.ft »T * 

- 1 SL-« - . - * 




'TULnONflFY FUNCTION TEST 


PftLS-VSE 


11/21 f7A 


FfWE IE-2 


2463 

93740 

6144 

2464 

0374 1 

5334 

246=5 

0 5 • 4,r_ 

305 ! 

2.406 

03743 

2144 

2467 

03744 

4121 

2463 

03745 

6760 

2469 

03746 

0003 

2470 

03747 

57L5 

2471 

03750 

0551 

2472 

03751 

0000 

2473 

03752 

G390 

2474 

03753 

8098 

2475 

33754 

8630 

2476 

03755 

8660 

2477 

03756 

8009 

2470 

33757 

CSC 8 

2479 

03763 

0000 


057 61 

0008 

2-43 1 

03732 

9808 

2432 

- 03763 

260 l 

-| t Q *7 

337 ■? , 4 

38SC 

" #1*1 .+ 

03765 

6390 

2^35 

037*36 

0882 

2436 

03767 

£438 

£L — y i 

03770 

0000 

2433 

03772 

1 

24-39 

03773 

27^2 

2490 

03774 

8336 

2491 

03775 

17^6 

2432 

02;T6 

2104 

2433 

DS777 

12 1.4 

2494 


4330 

2493 

84900 

0000 

2436 




F?UT FKflC 

FGET EX2 
FCfJL ZY 
"3U3 FKfiC 
??■!</ £*•? 
FFUT iNT 

JM? * I ISO 
LSDEL, 55 i 
LSEHD.0 
LSSTPT. 0 
LSSTPi.9 
FSSTR7. 3 
SLOPS. O' 0:0 


INT. 0:8:0 


FIPT5 . i:3?03;e 


F2PTS. 2:2433.; 9 


*4330 
BATf-f. 3 
S 



'TULMONRBV FUNCTION TEST 


VBLB-VS® FJJtSE £3 


ftBOBT 

3527 

EX 

9026 

P2FT5 

3766 

LS 

£393 

ftBTMG 

3534 

EXP 

0121 

F204? 

8137 

MfiNTIS 

8122 

RBTMPT 

3533 

EXY 

0023 

F3QTR 

2665 

myy 

2277 

ac 

18^1 

EX2 

9834 

F7 

3524 

FIEF? 

1236 

RDRIO 

8111 

EY 

0331 

GG 

1553 

MESSAG 

9657 

ADLOOP 

0 134 

F 

3366 

HOLD 

0729 

MGPT 

0112 

AD21WD 

0474 

FADD 

1008 

INDFC 

3341 

MINUSN 

0147 

AUX 

1341 

FDIV 

4888 

1NIT 

8288 

MINUSP 

1520 

8 

0750 

FENTER 

4467 

INPUT 

8106 

fllNUSS 

8128 

BAD 

2 137 

FEVMPT 

1652 

INSERT 

2765 

PIIFR 

1241 

BEGIN 

5479 

FEW 

1600 

IHT 

3768 

no 

1837 

BIGGER 

2141 

FEVT 

1222 

1NT5U 

3809 

MSG1 

8675 

BREATH 

2554 

fe in 

1225 

KEVIN 

8103 

MSG2 

8076 

BTP3 

I 

FEX1T 

9039 

KMAIT 

0472 

MS IHT 

2646 

BTPSFC 

1753 

fext 

9300 

K 10 

0473 

nstiA 

3462 

STP5K 

1732 

FGET 

3300 

K139 

1 146 

ns WRIT 

3443 

OALMFT 

157 1 

FIRST 

1 14j 

K2I2 

1153 

MSWTR 

3447 

CALMSG 

0751 

FIRST! 

T T 1(3 
4* - *— J 

S2!5 

l ! 47 

nswTi 

3424 

CAL1I3 

1521 

FIX 

^4 72 

K237 

1145 

M51PK 

0E77 

CALS 

1400 

i i.V’. 

1533 

K25 

2060 

MS2PK 

0100 

CALX IT 

3 472 

FKAC 

0 1 -<*i 

K3 

0117 

ms 

1570 

ChL/TP 

1523 

FLAGCL 

1 513 

K3I 

2060 

r232 

0C56 

CC2TLC 

12*^7 

FLEX IT 

:65^t 

r,?7 

0107 

N37 

1144 

CHHOLD 

1150 

FLGCL 

1513 

K7 774 

8116 

M74 

1151 

CKLP 

3S51 

FLO 

2233 

L 

0565 

T176 

1132 

CKLP1 

3674 

FLOAT 

4474 

LAST5M 

0113 

N 

0020 

CK27 

3247 

FLE5T 

1622 

LF 

1132 

NAMES 

8733 

CLOSE 

0131 

FLTEttF 

2241 

LINK 

1940 

- MGrtESP 

0312 

CLSUH 

1756 

FLT2 

2152 

L INKMG 

8721 

MB 

2745 

CONST 

3244 

FLTKOL 

45 33 

LOOP AD 

1572 

MSI 

3038 

COhVET 

4515 

FLlsA IT 

1323 

LOOPSU 

3035 

MO 

17 70 

CTRL 

6875 

FMPY 

7020 

LOST 

0723 

NCI 

1771 

CTRL I 

0612 

fm»jl 

3038 

LCSTMG 

0713 

NEWBR 

155S 

Cl* 

1203 

rnoEM 

7399 

LG3TPT 

0722 

NEU516 

0762 

CKLOOF 

3623 

FN2CL 

1515 

LSDEL 

3750 

NEwmi 

1134 

CVS 

3600 

FOOT 

4466 

LSEND 

3751 

NEWH2 

1457 

CV2VC 

1244 

FOUTS 

3213 

LSCI 

3715 

HEl*fi>T 

0335 

CIS 

2163 

FPLOT 

3400 

LSSTRT 

3752 

MEHS 

8316 

D 

1563 

FPT048 

2274 

L3STE1 

3753 

HEWSS 

0327 

dac 

6965 

FPT? 

2376 

L5TCH 

2744 

NEW!/ 

2312 

:*acm 

1524 

FFTZ5 

tiy i 2 

t CT< * r \t 
L-3 iv Vt 

25^3 

NHOLD 

i = .- * 

- 

DA CM2 

4376 

FPTT3 


lvmx 

2337 

NLhG 

2766 

DAFT 

ascr 

FPL'T 

i5’X)-C 

LI 

3342 

ML AST 

0164 

DATA 


70TB 

2062 

L 10 

1310 

NCCHS 

0449 

nPTiji-i 

0386 

F? 

0541 

Lii 

1315 

NOSE 

2734 

DECODE 

10*3 

PR? 

3711 

LIZ 

1322 

H05BST 

2726 

DELAY 

31 14 

FF.STTG 

0 i 02 

L 13 

1327 

HOSH7T 

0320 

DIG 

0523 

FSSTPT 

7754 

L14 

133-1 

MOSTOP 

1583 

D IGF 

0310 

FSUS 

2080 

L 15 

2767 

hotpck 

m3 

Dean 


-1 'CZl'C 

1233 

LI 

0771 

Mf 

1767 

D*J MhD 

6 isT 

F1FT2 

2101 

12 

1252 

risTArr 

9165 


0133 

FIPT5 

3763 

L4 

1257 

HSTORE 

9183 

EOB 

263 1 

F 1 0 

1706 

L6 

1264 

NTIDAL 

3156 

EE? 

1565 

7100 

0173 

L7 

1271 

NUriOUT 

3313 

ET 

2557 

F12FEIX 

1233 

L3 

1276 

HUhOO 

383? 



''PULMONABY FUNCTION TEST 

f 


PAL8-YSB 

NUSEP 

2572 

TYPE 

nee 

W1EY 

2366 

NWL3T 

0170 

TYPFLG 

1514 

ML OOP 

2400 

NWLST1 

5317 

UNIT 

1154. 

J4ISTF 

2741 

H2DEL7 

1203 

UNIT? 

0313 

t-NSTFP 

0171 

N2HQLD 

3523 

UNPACK 

4405 

musE 

2571 

H2MAX 

256 1 

UP 

3441 

WST 

2764 

N2PB10 

0124 

k'ADA 1 0 

1352 

WSTO? 

2566 

N2SAM 

0113 

L’.ALV'E 

0127 

W7LAST 0166 

N2SUM 

2551 

YA2RV 

1211 

tt'STR 

2742 

N2SUMP 

3033 

R’BELOW 

0450 

Wt'STSP 

0172 

N2ZCT 

3034 

VC 

1214 

tVUSE 


OFFSET 

0622 

KLC 

1637 

WZESO 

mi 

or, 

0433 

V'CLOSE 

0455 

XHOLIt 

9372 

OPEN 

0139 

YCOMP 

'goo 

XIT 

1026 

OUTCT 

0314 

t'ENT 

2554 

XITPT 

0191 

■xiTPirr 

4512 

t-TOB 

1650 

zc 

3661 

1 jl^EPY 

0230 

YFHI 

0142 

ZF'--> 

3125 

P 

l 172 

{ /7 1 RST 

0137 

ZFRS 

3130 

PC 

1036 

v-’FLO 

0143 

ZLEAYE 

311© 

PLOT 

3463 

l J IN 

1643 

ZNrl 

3969 

PSTBFB 

TCT'Tfj 

p*irrr 

1711 

Z3T 

3057 

PRT2T 

0195 

YKZY 

2244 


PT02 

3 13 1 

YKEVIN 

1351 


- 

PT125D 

334S 

hast 

0465 



PT750 

3337 

IT-PRIB 

3150 



QiJE 

0700 

m 

2345 



READY 

4473 

HIP 

234-; 



REPOST 

0236 

YN KEY 

3154 



RETURN 

till 

KH.BFB 

2746 



R IGHT 

10S0 

YOLDIF 

2546 



P.PT 

1425 

i^OLGME 

3132 



SPTCK 

0557 

I'PKEY 

0155 



EPTB 

2114 

HPOINT 

2061 



P.V 

1200 

I7SHIFT 

0467 



SAMPLE 

6537 

YSKEY 

0153 



S3 

2743 

l^TAST 0135 



3 BANAL 

3250 

l-'STORE 

0162 



3B21A3L 

i'737 

vs*.* 

2747 . 



SEARCH 

2104 

YTEMP 

0466 



5ERI/IC 

I0Q0 

XTHKSK 

0470 



SLEA? 

22 15 

YU 




SLOPE 

“755 

'--"USE 

i£4~ 



SPIRO 

rvj i 

YUSE? 

•.Ji -j 



3FIP05 

€'439 

VWRNT 

2147 



STOKE 

1727 

i. WATCH 

047! 



STOREW 

32G0 

1-JADAIO 

2365 



3TOSP 

0235 

WAIT 

01*4. 



STEPO 

2032 

MAITPT 

0*34 



SUMS 

0335 

WASH5 

2350 



thru 

1129 

wc 

2565 



TIMINC 

3134 

WCLC 

2421 



TLC 

1217 

WD2FLT 

3144 



TOOLO 

26 i? 

WFJM 

2537 



TTI 

0609 

WF INIS 

3723 



TTO 

1042 

MINT 

>600 




tiszisr* fom 13-1 

i ' ' ' ' ' '' ' 




ERROBS DETECTED: 9 
LINKS GENERATED: SI 



ABORT 1619 2318# 

ABTMG 2322 2323# 

ABTKPT 2319 2322# 

AC S7S 783 709# 


ADA 10 

119* 

218 

255 

885 

085 

1045 

1155 

nee 

1601 

AD LOOP 

151* 

209 

254 

1644 

U79 





AB21WD 

126 

451# 

473 







AUX 

256 

929# 

949 







B 

66 1* 

sec 








BAD 

1417“ 

1421 








BEGIN 

34* 

29! 

327 

1046 

1134 

1626 

1639 

232! 


BI66EB. 

1408 

1419# 








BREATH 

1700 

1746# 

1977 

1980 






3TF5 

36* 

353 

1217 

1314 

1323 

1481 

1480 

1487 

1683 


2293 

2410 

2430 







BTPSFC 

1253 

1273# 








BTP3R 

97 

1256# 

1260 







CALMPT 

974 

1115# 








CAMSG 

652* 

1115 








CALN2 

384 

1065# 








CALS 

553 

973# 








CAL KIT 

!93A* 

1067 








CALXTP 

982 

1637# 








CC2TLC 

865* 

947 








^HH'^LD 

735 

725 

740 

744 

792# 




CKLP 

2402* 

2427 








CKLPl 

2418 

2421# 








CK27 

2082 

2116# 








CLOSE 

148* 

433 








CLSUH 

1288* 

1296 

2378 







CONST 

2086 

2113# 








CON HIT 

125* 

335 

1030 

1813 


^950 




CTRL 

25* 

237 

423 

434 

1162 

2235 

2243 


CTRL I 

535 

541# 








CS/ 

832# 

939 

943 

2435 






CM OOP 

2330* 

2330 








as 

2175 

2361# 

2437 







Ct'2M 

362* 

342 








C 13 

1440 

144b# 








D 

1094 

1037 

1 in*’* * 

3113 






PhC 

21# 

373 

98-: 

1383 

1226 

1352 

1954 

2215 

2217 


2306 









DACN 

195 

1072# 

103! 







DACN2 

194# 

ISOS 

l?!9 







ThPT 

2CS 

233# 

3iS 







LATA 

152 

130 

2423* 







DATUM 

289 

275 

277 

273 

279 

292* 




DECODE 

723 

732# 








DELAY 

123* 

1623 

1237 

1607 

1311 

2261 




DIG 

294 

47S# 








DLGP 

264 

234# 








DOWN 

2234 

2247# 








DUMAD 

1 33* 

1124 








W\\ 

\ 50# 

1079 

1225 







SOB 

1771 

1734# 








ERR 

1009 

1111# 








EX 

1741* 

1931 

2032 

2034 

2078 

2080 




uCi 

72* 

356 

337 

2446 

2447 

2453 

2461 



EXP 

139* 

355 

358 

353 

362 

2033 

2095 

2227 

2231 


2133 


2303 


2243 





2452 

2459 

2467 








EXY 

69* 

364 

3S5 

2457 

24S2 






e:<2 

73* 

368 

361 

2450 

2464 






EV 

75* 

348 

349 

2454 

2465 






F 

607 

808 

951* 








FhDD 

!0* 

343 

35S 

360 

364 

944 

1694 

1707 

2100 

2139 


2148 

2413 







f mv 

14* 

932 

936 

840 

945 

1219 

1490 

2095 

2899 

2295 


2453 

2467 







FENTEK 


274 

345 

354 

930 

1001 

1011 

1973 

1218 

1257 


1275 

1315 

1324 

1335 

134! 

1347 

1353 

1382 

1402 

1442 


1474 

1481 

I486 


1703 

1715 

1724 

1934 

2306 

2051 


2834 

2107 

2131 

2137 

2162 

2169 

2281 

2294 

2362 

2368 


2333 

2484 

241 : 

2431 

2445 




FER1P7 

It47 

1189* 








FEi/S 

556 

1 146* 









FEWT • 


932 

935 

1316 

1327 

!329 





FEXi 

947* 

931 

1225 








FEXIT 

13* 

273 

338 

736 

948 

1004 

1013 

1975 

1221 

1259 


1 275 

1317 

1332 

1337 

1344 

1349 

1355 

1234 

1404 

1444 


1477 

1483 

149! 

1893 

1711 

1713 

1727 

1287 

2009 

2053 


2102 

2110 

2134 

2:41 

2165 

2174 

2234 

2297 

2365 

23" 1 


2395 

2437 

24J5 

2433 

2469 






FEXT 

17* 









F6ET 

15* 

275 

353 

362 

931 

935 

939 

943 

1012 

1326 


1329 

1336 

1343 

I3J0 

1696 

1709 

1716 

1725 

3935 

200? 


2083 

2091 

2694 

2^03 

2101 

2X33 

2139 

2363 

2369 

2433 

FIRST 

2440 

2449 

2453 

2456 

2461 

2434 




728 

727 

"29 

762 

787* 






FIPST1 

1383 

1412 

1419 

1424* 







FIX 

93* 

1876 

1222 

2226 

2298 






F i XX 

99 

1888* 

1110 

1112 







FKhC 

160* 

347 

363 

1473 

1490 

1691 

1696 

1705 

1709 

1716 


2037 

2999 



2164 

2171 

2406 

2414 

2432 

2434 


2443 

? * 

2455 

2452 

2463 

2466 





FLftGCL 

992 

9^5 

998 

1659* 







FLEX IT 

1188 

1133 

1193* 








FLGCL 

1033 

1053* 









FLO 

13^3 

1352 

1-«C* 

1467 

1476 

1492 





FLOrtT 

102* 

1473 

23S2 







FLFST 

1164* 










FLTEMP 

14T2 

1489 

1493* 








FLT7; 

183 

.437* 

1445 








FLTVOL 

?53* 

352 

1216 

1713 

1322 

1400 

1479 

i486 

1633 

2129 


2292 

2409 

2429 







FL^IT 

1163* 

1177 

1223 








FMPV 

12* 










Fmt 

13* 

343 

35** 

363 

933 

937 

341 

946 

1302 

1874 


1229 

1253 

1275 

1327 

1330 

1475 

1794 

1706 

2036 

2163 


2170 

2172 

2232 

2233 

2296 

2485 

2412 

24^7 

2450 

2454 


2457 

2462 

246 ; 






FtfORM 

13* 

1274 

1443 

2052 

2085 






FH2CL 

1003 

1912 

1861* 








FOOT 

98* 

284 

1013 








POUTS 

91 

215* 

239 








FFLOT 

163S 

2213* 

2345 








FPT940 

1475 

1521* 









FPT2 

1343 

1372* 

2008 

2696 







FPT25 

132b 

1366* 

2139 

2140 







FF1T5 

1378 

1369* 

2133 

2138 









FFUT 

16* 

547 


947 

1003 


1482 

1691 



2893 


2432 

2435 

FOTE 

1328 

1336 

FP 

285 

492* 

PEP 

262 

295* 

FP3MG 

■ 12* 


FSSTPT 

2379 

2386 

FSUS 

11* 

1483 


2171 

2364 

T\K2VC 

853* 

938 

F1FTZ 

134? 

1375* 

F1PT5 

23*4 

2432* 

FIG 

1219 

1228* 

FI00 

191* 

333 

FI2FEI/ 

C50* 

934 

F2PT5 

2370 

2435* 

F2647 

155* 

1674 

F30TE 

1331 

1363* 

F7 

2395 

2310* 

GG 

1 -91* 

1102 

HOLD 

591 

59 S 

IN DEC 

2127 

2i 

IN IT 

95 

203* 

INPUT 

1 I b* 

531 

rNSEET 

1772 

1327 

I NT 

2413 

2468 

INTSU 

1599 

1783 

KEVIN 

113* 

211 

KNri IT 

40? 

430 

319 

404 

4^3* 

K 100 

749 

798* 

K2I2 

T 7Z 

795* 

K215 

. w*4 

791* 

t 237 

75C 

739* 

I'OC 

1353* 


• '+ 

131^ 


K31 

1319 

1357* 

hr r 

1 17* 

542 

K7774 

130* 

977 

L 

513* 

79? 

LASTSM 

1 IS* 


Lf 

?-*3 

773* 

LINK 

673 

70 i 

LINKING 

594 

6 CIO 

LOOPED 

i5 1 

112 i* 

LCLPSU 
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